/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / try_qb / qcards.bas

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| fc 00 01 00 0c 00 81 01 | 82 01 06 00 01 02 03 04 |........|........|
|00000010| 05 08 14 10 ff ff 24 00 | ff ff 75 08 aa 00 56 00 |......$.|..u...V.|
|00000020| a2 00 e1 01 f3 00 83 00 | 60 00 ba 00 0d 02 b0 01 |........|`.......|
|00000030| a9 02 0e 01 79 00 c9 00 | 83 01 99 00 e1 00 a5 04 |....y...|........|
|00000040| 56 04 d8 00 c2 00 69 00 | 34 04 d0 00 e9 01 70 00 |V.....i.|4.....p.|
|00000050| 5b 00 16 01 02 02 91 00 | db 03 ea 00 00 00 00 00 |[.......|........|
|00000060| 42 07 48 07 54 07 60 07 | 6c 07 00 00 00 00 72 07 |B.H.T.`.|l.....r.|
|00000070| 52 00 fc 00 00 01 41 43 | 01 00 01 5a 63 03 00 05 |R.....AC|...Zc...|
|00000080| 53 50 41 43 45 e0 04 00 | 03 45 53 43 b2 00 00 05 |SPACE...|.ESC....|
|00000090| 45 4e 54 45 52 bb 01 00 | 06 54 41 42 4b 45 59 8b |ENTER...|.TABKEY.|
|000000a0| 00 00 04 44 4f 57 4e 05 | 01 00 02 55 50 8e 01 00 |...DOWN.|...UP...|
|000000b0| 04 4c 45 46 54 8d 02 00 | 05 52 49 47 48 54 d8 01 |.LEFT...|.RIGHT..|
|000000c0| 00 04 48 4f 4d 45 ec 02 | 00 04 45 4e 44 4b 99 01 |..HOME..|..ENDK..|
|000000d0| 00 04 50 47 44 4e 56 01 | 00 04 50 47 55 50 1f 01 |..PGDNV.|..PGUP..|
|000000e0| 00 03 49 4e 53 2e 01 00 | 03 44 45 4c 00 00 00 04 |..INS...|.DEL....|
|000000f0| 4e 55 4c 4c 27 01 00 05 | 43 54 52 4c 44 f5 01 00 |NULL'...|CTRLD...|
|00000100| 05 43 54 52 4c 47 0f 03 | 00 05 43 54 52 4c 48 4c |.CTRLG..|..CTRLHL|
|00000110| 01 00 05 43 54 52 4c 53 | 78 01 00 05 43 54 52 4c |...CTRLS|x...CTRL|
|00000120| 56 24 02 00 05 42 4c 41 | 43 4b 39 01 00 04 42 4c |V$...BLA|CK9...BL|
|00000130| 55 45 48 02 00 05 47 52 | 45 45 4e 5d 02 00 04 43 |UEH...GR|EEN]...C|
|00000140| 59 41 4e 37 02 00 03 52 | 45 44 64 01 00 07 4d 41 |YAN7...R|EDd...MA|
|00000150| 47 45 4e 54 41 2d 02 00 | 06 59 45 4c 4c 4f 57 cd |GENTA-..|.YELLOW.|
|00000160| 01 00 05 57 48 49 54 45 | 6e 01 00 06 42 52 49 47 |...WHITE|n...BRIG|
|00000170| 48 54 bc 05 00 0a 42 41 | 43 4b 47 52 4f 55 4e 44 |HT....BA|CKGROUND|
|00000180| a9 06 00 06 4e 4f 52 4d | 41 4c 70 02 00 06 48 49 |....NORM|ALp...HI|
|00000190| 4c 49 54 45 11 04 00 07 | 43 4e 4f 52 4d 41 4c b9 |LITE....|CNORMAL.|
|000001a0| 02 00 07 43 48 49 4c 49 | 54 45 c1 02 00 07 48 45 |...CHILI|TE....HE|
|000001b0| 4c 50 54 4f 50 a4 01 00 | 07 48 45 4c 50 42 4f 54 |LPTOP...|.HELPBOT|
|000001c0| 3e 04 00 08 48 45 4c 50 | 4c 45 46 54 52 02 00 07 |>...HELP|LEFTR...|
|000001d0| 48 45 4c 50 57 49 44 8b | 04 00 0e 43 41 52 44 53 |HELPWID.|...CARDS|
|000001e0| 50 45 52 53 43 52 45 45 | 4e 65 04 00 07 4c 41 53 |PERSCREE|Ne...LAS|
|000001f0| 54 52 4f 57 dc 02 00 05 | 46 41 4c 53 45 e5 02 00 |TROW....|FALSE...|
|00000200| 04 54 52 55 45 66 02 00 | 08 43 55 52 53 4f 52 4f |.TRUEf..|.CURSORO|
|00000210| 4e 19 02 00 09 43 55 52 | 53 4f 52 4f 46 46 98 02 |N....CUR|SOROFF..|
|00000220| 00 07 54 4d 50 46 49 4c | 45 ea 03 00 08 44 49 53 |..TMPFIL|E....DIS|
|00000230| 4b 46 49 4c 45 17 05 00 | 07 4e 50 45 52 53 4f 4e |KFILE...|.NPERSON|
|00000240| 3f 02 00 05 4e 4e 4f 54 | 45 26 03 00 06 4e 4d 4f |?...NNOT|E&...NMO|
|00000250| 4e 54 48 ca 02 00 04 4e | 44 41 59 4a 03 00 05 4e |NTH....N|DAYJ...N|
|00000260| 59 45 41 52 78 02 00 06 | 4e 50 48 4f 4e 45 1a 03 |YEARx...|NPHONE..|
|00000270| 00 07 4e 53 54 52 45 45 | 54 f5 02 00 05 4e 43 49 |..NSTREE|T....NCI|
|00000280| 54 59 93 03 00 06 4e 53 | 54 41 54 45 a1 02 00 04 |TY....NS|TATE....|
|00000290| 4e 5a 49 50 83 02 00 07 | 4e 46 49 45 4c 44 53 d7 |NZIP....|NFIELDS.|
|000002a0| 05 00 06 50 45 52 53 4f | 4e 1b 04 00 07 43 61 72 |...PERSO|N....Car|
|000002b0| 64 4e 75 6d b2 02 00 05 | 4e 61 6d 65 73 86 03 00 |dNum....|Names...|
|000002c0| 04 4e 6f 74 65 45 04 00 | 05 4d 6f 6e 74 68 bf 03 |.NoteE..|.Month..|
|000002d0| 00 03 44 61 79 05 03 00 | 04 59 65 61 72 06 05 00 |..Day...|.Year...|
|000002e0| 05 50 68 6f 6e 65 d4 02 | 00 06 53 74 72 65 65 74 |.Phone..|..Street|
|000002f0| 34 06 00 04 43 69 74 79 | 4c 04 00 05 53 74 61 74 |4...City|L...Stat|
|00000300| 65 cb 04 00 03 5a 69 70 | 05 04 40 05 41 6c 61 72 |e....Zip|..@.Alar|
|00000310| 6d 00 00 40 0c 44 69 72 | 65 63 74 69 6f 6e 4b 65 |m..@.Dir|ectionKe|
|00000320| 79 78 03 00 06 43 68 6f | 69 63 65 32 03 00 07 54 |yx...Cho|ice2...T|
|00000330| 6f 70 43 61 72 64 d9 04 | 00 08 4c 61 73 74 43 61 |opCard..|..LastCa|
|00000340| 72 64 a0 03 40 08 41 73 | 63 69 69 4b 65 79 3d 03 |rd..@.As|ciiKey=.|
|00000350| 40 07 43 6c 65 61 6e 55 | 70 6b 03 40 09 43 6c 65 |@.CleanU|pk.@.Cle|
|00000360| 61 72 48 65 6c 70 57 03 | 40 09 44 72 61 77 43 61 |arHelpW.|@.DrawCa|
|00000370| 72 64 73 00 00 40 08 45 | 64 69 74 43 61 72 64 f7 |rds..@.E|ditCard.|
|00000380| 03 08 04 43 61 72 64 b0 | 03 40 09 49 6e 69 74 49 |...Card.|.@.InitI|
|00000390| 6e 64 65 78 00 00 40 0a | 50 72 69 6e 74 4c 61 62 |ndex..@.|PrintLab|
|000003a0| 65 6c 00 00 40 09 53 6f | 72 74 49 6e 64 65 78 10 |el..@.So|rtIndex.|
|000003b0| 07 00 09 53 6f 72 74 46 | 69 65 6c 64 cb 03 40 0c |...SortF|ield..@.|
|000003c0| 53 68 6f 77 56 69 65 77 | 48 65 6c 70 72 04 40 0b |ShowView|Helpr.@.|
|000003d0| 53 68 6f 77 54 6f 70 43 | 61 72 64 b1 04 08 08 57 |ShowTopC|ard....W|
|000003e0| 6f 72 6b 43 61 72 64 28 | 04 40 0c 53 68 6f 77 45 |orkCard(|.@.ShowE|
|000003f0| 64 69 74 48 65 6c 70 c3 | 04 40 0b 53 68 6f 77 43 |ditHelp.|.@.ShowC|
|00000400| 6d 64 4c 69 6e 65 92 05 | 40 09 53 68 6f 77 43 61 |mdLine..|@.ShowCa|
|00000410| 72 64 73 00 00 00 0a 45 | 64 69 74 53 74 72 69 6e |rds....E|ditStrin|
|00000420| 67 bb 06 00 08 49 6e 53 | 74 72 69 6e 67 29 05 00 |g....InS|tring)..|
|00000430| 06 4c 65 6e 67 74 68 7b | 04 00 09 4e 65 78 74 46 |.Length{|...NextF|
|00000440| 69 65 6c 64 f4 04 00 08 | 46 69 6e 64 43 61 72 64 |ield....|FindCard|
|00000450| fe 05 00 06 50 72 6f 6d | 70 74 00 00 00 03 4d 73 |....Prom|pt....Ms|
|00000460| 67 39 05 00 03 52 6f 77 | fe 06 00 06 43 6f 6c 75 |g9...Row|....Colu|
|00000470| 6d 6e 28 06 00 0b 53 65 | 6c 65 63 74 46 69 65 6c |mn(...Se|lectFiel|
|00000480| 64 00 00 04 09 4d 65 6d | 6f 72 79 45 72 72 00 00 |d....Mem|oryErr..|
|00000490| 08 05 49 6e 64 65 78 99 | 04 00 0c 43 61 72 64 2e |..Index.|...Card.|
|000004a0| 43 61 72 64 4e 75 6d 5c | 05 04 0a 43 61 72 64 53 |CardNum\|...CardS|
|000004b0| 63 72 65 65 6e 00 00 04 | 08 56 69 65 77 48 65 6c |creen...|.ViewHel|
|000004c0| 70 ae 05 04 08 45 64 69 | 74 48 65 6c 70 58 06 04 |p....Edi|tHelpX..|
|000004d0| 0e 46 69 65 6c 64 50 6f | 73 69 74 69 6f 6e 73 00 |.FieldPo|sitions.|
|000004e0| 00 00 04 54 6f 6e 65 00 | 00 00 0a 55 73 65 72 43 |...Tone.|...UserC|
|000004f0| 68 6f 69 63 65 dc 06 00 | 03 54 6d 70 6b 06 00 10 |hoice...|.Tmpk...|
|00000500| 57 6f 72 6b 43 61 72 64 | 2e 43 61 72 64 4e 75 6d |WorkCard|.CardNum|
|00000510| 00 00 00 0e 57 6f 72 6b | 43 61 72 64 2e 4e 61 6d |....Work|Card.Nam|
|00000520| 65 73 4a 05 00 0d 57 6f | 72 6b 43 61 72 64 2e 4e |esJ...Wo|rkCard.N|
|00000530| 6f 74 65 e3 05 00 0e 57 | 6f 72 6b 43 61 72 64 2e |ote....W|orkCard.|
|00000540| 4d 6f 6e 74 68 6f 05 00 | 0c 57 6f 72 6b 43 61 72 |Montho..|.WorkCar|
|00000550| 64 2e 44 61 79 c9 05 00 | 0d 57 6f 72 6b 43 61 72 |d.Day...|.WorkCar|
|00000560| 64 2e 59 65 61 72 80 05 | 00 0e 57 6f 72 6b 43 61 |d.Year..|..WorkCa|
|00000570| 72 64 2e 50 68 6f 6e 65 | a2 05 00 0f 57 6f 72 6b |rd.Phone|....Work|
|00000580| 43 61 72 64 2e 53 74 72 | 65 65 74 00 00 00 0d 57 |Card.Str|eet....W|
|00000590| 6f 72 6b 43 61 72 64 2e | 43 69 74 79 60 06 00 0e |orkCard.|City`...|
|000005a0| 57 6f 72 6b 43 61 72 64 | 2e 53 74 61 74 65 00 00 |WorkCard|.State..|
|000005b0| 00 0c 57 6f 72 6b 43 61 | 72 64 2e 5a 69 70 33 07 |..WorkCa|rd.Zip3.|
|000005c0| 00 08 4e 65 78 74 46 6c | 61 67 2a 07 00 0a 43 61 |..NextFl|ag*...Ca|
|000005d0| 72 64 2e 4e 61 6d 65 73 | f0 05 00 09 43 61 72 64 |rd.Names|....Card|
|000005e0| 2e 4e 6f 74 65 46 06 00 | 0a 43 61 72 64 2e 4d 6f |.NoteF..|.Card.Mo|
|000005f0| 6e 74 68 0d 06 00 08 43 | 61 72 64 2e 44 61 79 53 |nth....C|ard.DayS|
|00000600| 06 00 09 43 61 72 64 2e | 59 65 61 72 1a 06 00 0a |...Card.|Year....|
|00000610| 43 61 72 64 2e 50 68 6f | 6e 65 00 00 00 0b 43 61 |Card.Pho|ne....Ca|
|00000620| 72 64 2e 53 74 72 65 65 | 74 00 00 00 09 43 61 72 |rd.Stree|t....Car|
|00000630| 64 2e 43 69 74 79 00 00 | 00 0a 43 61 72 64 2e 53 |d.City..|..Card.S|
|00000640| 74 61 74 65 0a 07 00 08 | 43 61 72 64 2e 5a 69 70 |tate....|Card.Zip|
|00000650| 3e 06 00 06 49 6e 73 65 | 72 74 f4 06 00 04 57 6f |>...Inse|rt....Wo|
|00000660| 72 6b 77 06 00 09 46 69 | 72 73 74 54 69 6d 65 00 |rkw...Fi|rstTime.|
|00000670| 00 00 01 50 88 06 00 04 | 4d 61 78 50 19 07 08 07 |...P....|MaxP....|
|00000680| 54 6d 70 43 61 72 64 00 | 00 00 08 4e 6f 74 46 69 |TmpCard.|...NotFi|
|00000690| 72 73 74 00 00 00 0d 54 | 6d 70 43 61 72 64 2e 4e |rst....T|mpCard.N|
|000006a0| 61 6d 65 73 98 06 00 0c | 54 6d 70 43 61 72 64 2e |ames....|TmpCard.|
|000006b0| 4e 6f 74 65 cb 06 00 0d | 54 6d 70 43 61 72 64 2e |Note....|TmpCard.|
|000006c0| 50 68 6f 6e 65 eb 06 00 | 0e 54 6d 70 43 61 72 64 |Phone...|.TmpCard|
|000006d0| 2e 53 74 72 65 65 74 00 | 00 00 0c 54 6d 70 43 61 |.Street.|...TmpCa|
|000006e0| 72 64 2e 43 69 74 79 00 | 00 00 0d 54 6d 70 43 61 |rd.City.|...TmpCa|
|000006f0| 72 64 2e 53 74 61 74 65 | 3d 07 00 0b 54 6d 70 43 |rd.State|=...TmpC|
|00000700| 61 72 64 2e 5a 69 70 00 | 00 00 05 46 6f 75 6e 64 |ard.Zip.|...Found|
|00000710| 00 00 00 06 52 65 63 6f | 72 64 00 00 00 08 46 69 |....Reco|rd....Fi|
|00000720| 65 6c 64 4e 75 6d 00 00 | 00 02 4b 79 00 00 00 05 |eldNum..|..Ky....|
|00000730| 43 6f 75 6e 74 20 07 00 | 03 43 6c 72 00 00 00 06 |Count ..|.Clr....|
|00000740| 4f 66 66 73 65 74 00 00 | 00 05 4c 69 6d 69 74 00 |Offset..|..Limit.|
|00000750| 00 00 06 53 77 69 74 63 | 68 00 00 00 01 69 00 00 |...Switc|h....i..|
|00000760| 02 02 65 00 4e 07 02 02 | 66 00 00 00 02 02 67 00 |..e.N...|f.....g.|
|00000770| 5a 07 02 02 68 00 00 00 | 02 02 69 00 66 07 02 02 |Z...h...|..i.f...|
|00000780| 6a 00 00 00 02 02 6b 00 | 00 00 02 02 6c 00 73 2e |j.....k.|....l.s.|
|00000790| 00 00 23 00 65 01 20 00 | 0c 00 60 00 65 01 1b 00 |..#.e. .|..`.e...|
|000007a0| 0c 00 69 00 65 01 0d 00 | 0c 00 70 00 64 25 0c 00 |..i.e...|..p.d%..|
|000007b0| 79 00 00 00 23 00 65 01 | 50 00 0c 00 83 00 65 01 |y...#.e.|P.....e.|
|000007c0| 48 00 0c 00 8b 00 65 01 | 4b 00 0c 00 91 00 65 01 |H.....e.|K.....e.|
|000007d0| 4d 00 0c 00 99 00 00 00 | 23 00 65 01 47 00 0c 00 |M.......|#.e.G...|
|000007e0| a2 00 65 01 4f 00 0c 00 | aa 00 65 01 51 00 0c 00 |..e.O...|..e.Q...|
|000007f0| b2 00 65 01 49 00 0c 00 | ba 00 00 00 23 00 65 01 |..e.I...|....#.e.|
|00000800| 52 00 0c 00 c2 00 65 01 | 53 00 0c 00 c9 00 64 01 |R.....e.|S.....d.|
|00000810| 0c 00 d0 00 00 00 23 00 | 64 11 0c 00 d8 00 64 1d |......#.|d.....d.|
|00000820| 0c 00 e1 00 64 21 0c 00 | ea 00 65 01 13 00 0c 00 |....d!..|..e.....|
|00000830| f3 00 65 01 16 00 0c 00 | fc 00 00 00 00 00 97 00 |..e.....|........|
|00000840| 46 00 00 00 20 44 65 66 | 69 6e 65 20 45 6e 67 6c |F... Def|ine Engl|
|00000850| 69 73 68 20 6e 61 6d 65 | 73 20 66 6f 72 20 63 6f |ish name|s for co|
|00000860| 6c 6f 72 2d 73 70 65 63 | 69 66 69 63 61 74 69 6f |lor-spec|ificatio|
|00000870| 6e 20 6e 75 6d 62 65 72 | 73 2e 20 41 64 64 20 42 |n number|s. Add B|
|00000880| 52 49 47 48 54 20 74 6f | 00 00 97 00 23 00 00 00 |RIGHT to|....#...|
|00000890| 20 a6 2c 00 00 97 00 3f | 00 00 00 2a 20 51 43 61 | .,....?|...* QCa|
|000008a0| 72 64 73 20 2d 20 41 20 | 73 69 6d 70 6c 65 20 64 |rds - A |simple d|
|000008b0| 61 74 61 62 61 73 65 20 | 75 73 69 6e 67 20 61 20 |atabase |using a |
|000008c0| 63 61 72 64 66 69 6c 65 | 20 75 73 65 72 20 69 6e |cardfile| user in|
|000008d0| 74 65 72 66 61 63 65 2e | 00 00 00 97 00 42 00 00 |terface.|.....B..|
|000008e0| 00 2a 20 45 61 63 68 20 | 72 65 63 6f 72 64 20 69 |.* Each |record i|
|000008f0| 6e 20 74 68 65 20 64 61 | 74 61 62 61 73 65 20 69 |n the da|tabase i|
|00000900| 73 20 72 65 70 72 65 73 | 65 6e 74 65 64 20 62 79 |s repres|ented by|
|00000910| 20 61 20 63 61 72 64 2e | 20 54 68 65 20 75 73 65 | a card.| The use|
|00000920| 72 00 00 97 00 3d 00 00 | 00 2a 20 63 61 6e 20 73 |r....=..|.* can s|
|00000930| 63 72 6f 6c 6c 20 74 68 | 72 6f 75 67 68 20 74 68 |croll th|rough th|
|00000940| 65 20 63 61 72 64 73 20 | 75 73 69 6e 67 20 6e 6f |e cards |using no|
|00000950| 72 6d 61 6c 20 73 63 72 | 6f 6c 6c 69 6e 67 20 6b |rmal scr|olling k|
|00000960| 65 79 73 2e 20 00 00 97 | 00 3e 00 00 00 2a 20 4f |eys. ...|.>...* O|
|00000970| 74 68 65 72 20 63 6f 6d | 6d 61 6e 64 73 20 61 6c |ther com|mands al|
|00000980| 6c 6f 77 20 74 68 65 20 | 75 73 65 72 20 74 6f 20 |low the |user to |
|00000990| 65 64 69 74 2c 20 61 64 | 64 2c 20 73 6f 72 74 2c |edit, ad|d, sort,|
|000009a0| 20 66 69 6e 64 2c 20 6f | 72 00 00 97 00 11 00 00 | find, o|r.......|
|000009b0| 00 2a 20 64 65 6c 65 74 | 65 20 63 61 72 64 73 2e |.* delet|e cards.|
|000009c0| 73 00 00 97 00 03 00 00 | 00 2a 20 00 00 97 00 30 |s.......|.* ....0|
|000009d0| 00 00 00 2a 20 49 6e 70 | 75 74 3a 20 20 4b 65 79 |...* Inp|ut:  Key|
|000009e0| 62 6f 61 72 64 20 2d 20 | 75 73 65 72 20 63 6f 6d |board - |user com|
|000009f0| 6d 61 6e 64 73 20 61 6e | 64 20 65 6e 74 72 69 65 |mands an|d entrie|
|00000a00| 73 00 00 97 00 1d 00 00 | 00 2a 0d 09 20 46 69 6c |s.......|.*.. Fil|
|00000a10| 65 20 2d 20 64 61 74 61 | 62 61 73 65 20 72 65 63 |e - data|base rec|
|00000a20| 6f 72 64 73 6f 00 00 97 | 00 03 00 00 00 2a 0d 00 |ordso...|.....*..|
|00000a30| 00 97 00 2a 00 00 00 2a | 20 4f 75 74 70 75 74 3a |...*...*| Output:|
|00000a40| 20 53 63 72 65 65 6e 20 | 2d 20 63 61 72 64 20 64 | Screen |- card d|
|00000a50| 69 73 70 6c 61 79 20 61 | 6e 64 20 68 65 6c 70 00 |isplay a|nd help.|
|00000a60| 00 97 00 1d 00 00 00 2a | 0d 09 20 46 69 6c 65 20 |.......*|.. File |
|00000a70| 2d 20 64 61 74 61 62 61 | 73 65 20 72 65 63 6f 72 |- databa|se recor|
|00000a80| 64 73 70 00 00 97 00 03 | 00 00 00 2a 0d 00 00 00 |dsp.....|...*....|
|00000a90| 00 97 00 25 00 00 00 20 | 54 68 65 20 6d 6f 64 75 |...%... |The modu|
|00000aa0| 6c 65 2d 6c 65 76 65 6c | 20 63 6f 64 65 20 62 65 |le-level| code be|
|00000ab0| 67 69 6e 73 20 68 65 72 | 65 2e 20 00 00 00 00 97 |gins her|e. .....|
|00000ac0| 00 31 00 00 00 0d 0f 2a | 20 44 65 63 6c 61 72 61 |.1.....*| Declara|
|00000ad0| 74 69 6f 6e 73 20 61 6e | 64 20 64 65 66 69 6e 69 |tions an|d defini|
|00000ae0| 74 69 6f 6e 73 20 62 65 | 67 69 6e 20 68 65 72 65 |tions be|gin here|
|00000af0| 20 0d 14 2a 00 00 00 00 | 00 1b 00 ff ff c1 ff ff | ..*....|........|
|00000b00| ff 97 00 3f 00 0f 00 52 | 65 73 65 74 73 20 74 68 |...?...R|esets th|
|00000b10| 65 20 64 65 66 61 75 6c | 74 20 64 61 74 61 20 74 |e defaul|t data t|
|00000b20| 79 70 65 20 66 72 6f 6d | 20 73 69 6e 67 6c 65 20 |ype from| single |
|00000b30| 70 72 65 63 69 73 69 6f | 6e 20 74 6f 20 69 6e 74 |precisio|n to int|
|00000b40| 65 67 65 72 00 00 00 00 | 00 97 00 4a 00 00 00 20 |eger....|...J... |
|00000b50| 44 65 66 69 6e 65 20 6e | 61 6d 65 73 20 73 69 6d |Define n|ames sim|
|00000b60| 69 6c 61 72 20 74 6f 20 | 6b 65 79 62 6f 61 72 64 |ilar to |keyboard|
|00000b70| 20 6e 61 6d 65 73 20 77 | 69 74 68 20 74 68 65 69 | names w|ith thei|
|00000b80| 72 20 65 71 75 69 76 61 | 6c 65 6e 74 20 6b 65 79 |r equiva|lent key|
|00000b90| 20 63 6f 64 65 73 2e 00 | 00 23 00 65 01 20 00 0c | codes..|.#.e. ..|
|00000ba0| 00 60 00 65 01 1b 00 0c | 00 69 00 65 01 0d 00 0c |.`.e....|.i.e....|
|00000bb0| 00 70 00 64 25 0c 00 79 | 00 00 00 23 00 65 01 50 |.p.d%..y|...#.e.P|
|00000bc0| 00 0c 00 83 00 65 01 48 | 00 0c 00 8b 00 65 01 4b |.....e.H|.....e.K|
|00000bd0| 00 0c 00 91 00 65 01 4d | 00 0c 00 99 00 00 00 23 |.....e.M|.......#|
|00000be0| 00 65 01 47 00 0c 00 a2 | 00 65 01 4f 00 0c 00 aa |.e.G....|.e.O....|
|00000bf0| 00 65 01 51 00 0c 00 b2 | 00 65 01 49 00 0c 00 ba |.e.Q....|.e.I....|
|00000c00| 00 00 00 23 00 65 01 52 | 00 0c 00 c2 00 65 01 53 |...#.e.R|.....e.S|
|00000c10| 00 0c 00 c9 00 64 01 0c | 00 d0 00 00 00 23 00 64 |.....d..|.....#.d|
|00000c20| 11 0c 00 d8 00 64 1d 0c | 00 e1 00 64 21 0c 00 ea |.....d..|...d!...|
|00000c30| 00 65 01 13 00 0c 00 f3 | 00 65 01 16 00 0c 00 fc |.e......|.e......|
|00000c40| 00 00 00 00 00 97 00 46 | 00 00 00 20 44 65 66 69 |.......F|... Defi|
|00000c50| 6e 65 20 45 6e 67 6c 69 | 73 68 20 6e 61 6d 65 73 |ne Engli|sh names|
|00000c60| 20 66 6f 72 20 63 6f 6c | 6f 72 2d 73 70 65 63 69 | for col|or-speci|
|00000c70| 66 69 63 61 74 69 6f 6e | 20 6e 75 6d 62 65 72 73 |fication| numbers|
|00000c80| 2e 20 41 64 64 20 42 52 | 49 47 48 54 20 74 6f 00 |. Add BR|IGHT to.|
|00000c90| 00 97 00 23 00 00 00 20 | 61 6e 79 20 63 6f 6c 6f |...#... |any colo|
|00000ca0| 72 20 74 6f 20 67 65 74 | 20 62 72 69 67 68 74 20 |r to get| bright |
|00000cb0| 76 65 72 73 69 6f 6e 2e | 70 00 00 23 00 64 01 0c |version.|p..#.d..|
|00000cc0| 00 05 01 64 05 0c 00 0e | 01 64 09 0c 00 16 01 64 |...d....|.d.....d|
|00000cd0| 0d 0c 00 1f 01 64 11 0c | 00 27 01 64 15 0c 00 2e |.....d..|.'.d....|
|00000ce0| 01 00 00 23 00 64 19 0c | 00 39 01 64 1d 0c 00 43 |...#.d..|.9.d...C|
|00000cf0| 01 64 21 0c 00 4c 01 00 | 00 00 00 97 00 4c 00 00 |.d!..L..|.....L..|
|00000d00| 00 20 41 73 73 69 67 6e | 20 63 6f 6c 6f 72 73 20 |. Assign| colors |
|00000d10| 74 6f 20 64 69 66 66 65 | 72 65 6e 74 20 6b 69 6e |to diffe|rent kin|
|00000d20| 64 73 20 6f 66 20 74 65 | 78 74 2e 20 42 79 20 63 |ds of te|xt. By c|
|00000d30| 68 61 6e 67 69 6e 67 20 | 74 68 65 20 63 6f 6c 6f |hanging |the colo|
|00000d40| 72 20 61 73 73 69 67 6e | 65 64 2c 00 00 97 00 49 |r assign|ed,....I|
|00000d50| 00 00 00 20 79 6f 75 20 | 63 61 6e 20 63 68 61 6e |... you |can chan|
|00000d60| 67 65 20 74 68 65 20 63 | 6f 6c 6f 72 20 6f 66 20 |ge the c|olor of |
|00000d70| 74 68 65 20 51 43 41 52 | 44 53 20 64 69 73 70 6c |the QCAR|DS displ|
|00000d80| 61 79 2e 20 54 68 65 20 | 69 6e 69 74 69 61 6c 20 |ay. The |initial |
|00000d90| 63 6f 6c 6f 72 73 20 61 | 72 65 65 00 00 97 00 42 |colors a|ree....B|
|00000da0| 00 00 00 20 63 68 6f 73 | 65 6e 20 62 65 63 61 75 |... chos|en becau|
|00000db0| 73 65 20 74 68 65 79 20 | 77 6f 72 6b 20 66 6f 72 |se they |work for|
|00000dc0| 20 63 6f 6c 6f 72 20 6f | 72 20 62 6c 61 63 6b 2d | color o|r black-|
|00000dd0| 61 6e 64 2d 77 68 69 74 | 65 20 64 69 73 70 6c 61 |and-whit|e displa|
|00000de0| 79 73 2e 00 00 23 00 0b | 00 05 01 0c 00 56 01 0b |ys...#..|.....V..|
|00000df0| 00 43 01 0c 00 64 01 0b | 00 43 01 0b 00 4c 01 00 |.C...d..|.C...L..|
|00000e00| 01 0c 00 6e 01 00 00 97 | 00 3b 00 00 00 20 43 6f |...n....|.;... Co|
|00000e10| 64 65 73 20 66 6f 72 20 | 6e 6f 72 6d 61 6c 20 61 |des for |normal a|
|00000e20| 6e 64 20 68 69 67 68 6c | 69 67 68 74 20 28 75 73 |nd highl|ight (us|
|00000e30| 65 64 20 69 6e 20 64 61 | 74 61 20 73 74 61 74 65 |ed in da|ta state|
|00000e40| 6d 65 6e 74 73 29 73 00 | 00 23 00 64 01 0c 00 78 |ments)s.|.#.d...x|
|00000e50| 01 64 05 0c 00 83 01 00 | 00 00 00 97 00 46 00 00 |.d......|.....F..|
|00000e60| 00 20 53 63 72 65 65 6e | 20 70 6f 73 69 74 69 6f |. Screen| positio|
|00000e70| 6e 73 20 2d 20 49 6e 69 | 74 69 61 6c 69 7a 65 64 |ns - Ini|tialized|
|00000e80| 20 66 6f 72 20 32 35 20 | 72 6f 77 73 2e 20 53 63 | for 25 |rows. Sc|
|00000e90| 72 65 65 6e 20 70 6f 73 | 69 74 69 6f 6e 73 20 63 |reen pos|itions c|
|00000ea0| 61 6e 20 62 65 00 00 97 | 00 3e 00 00 00 20 6d 6f |an be...|.>... mo|
|00000eb0| 64 69 66 69 65 64 20 66 | 6f 72 20 34 33 2d 72 6f |dified f|or 43-ro|
|00000ec0| 77 20 6d 6f 64 65 20 69 | 66 20 79 6f 75 20 68 61 |w mode i|f you ha|
|00000ed0| 76 65 20 61 6e 20 45 47 | 41 20 6f 72 20 56 47 41 |ve an EG|A or VGA|
|00000ee0| 20 61 64 61 70 74 65 72 | 2e 00 00 23 00 65 01 0f | adapter|...#.e..|
|00000ef0| 00 0c 00 8e 01 65 01 17 | 00 0c 00 99 01 65 01 3c |.....e..|.....e.<|
|00000f00| 00 0c 00 a4 01 65 01 14 | 00 0c 00 b0 01 00 00 23 |.....e..|.......#|
|00000f10| 00 64 1d 0c 00 bb 01 65 | 01 19 00 0c 00 cd 01 00 |.d.....e|........|
|00000f20| 00 00 00 97 00 23 00 00 | 00 20 4d 69 73 63 65 6c |.....#..|. Miscel|
|00000f30| 6c 61 6e 65 6f 75 73 20 | 73 79 6d 62 6f 6c 69 63 |laneous |symbolic|
|00000f40| 20 63 6f 6e 73 74 61 6e | 74 73 68 00 00 23 00 64 | constan|tsh..#.d|
|00000f50| 01 0c 00 d8 01 0b 00 d8 | 01 74 01 0c 00 e1 01 00 |........|.t......|
|00000f60| 00 23 00 64 05 0c 00 e9 | 01 64 01 0c 00 f5 01 00 |.#.d....|.d......|
|00000f70| 00 00 00 97 00 0d 00 00 | 00 20 46 69 6c 65 20 6e |........|. File n|
|00000f80| 61 6d 65 73 01 00 00 23 | 00 6d 01 0b 00 24 24 24 |ames...#|.m...$$$|
|00000f90| 38 37 79 24 2e 24 35 24 | 22 0c 14 02 02 97 00 15 |87y$.$5$|".......|
|00000fa0| 00 25 00 20 55 6e 6c 69 | 6b 65 6c 79 20 66 69 6c |.%. Unli|kely fil|
|00000fb0| 65 20 6e 61 6d 65 45 00 | 00 23 00 6d 01 0a 00 51 |e nameE.|.#.m...Q|
|00000fc0| 43 41 52 44 53 2e 44 41 | 54 0c 14 0d 02 00 00 97 |CARDS.DA|T.......|
|00000fd0| 00 0e 00 00 00 20 46 69 | 65 6c 64 20 6e 61 6d 65 |..... Fi|eld name|
|00000fe0| 73 00 00 23 00 64 01 0c | 00 19 02 64 05 0c 00 24 |s..#.d..|...d...$|
|00000ff0| 02 64 09 0c 00 2d 02 64 | 0d 0c 00 37 02 64 11 0c |.d...-.d|...7.d..|
|00001000| 00 3f 02 64 15 0c 00 48 | 02 00 00 23 00 64 19 0c |.?.d...H|...#.d..|
|00001010| 00 52 02 64 1d 0c 00 5d | 02 64 21 0c 00 66 02 64 |.R.d...]|.d!..f.d|
|00001020| 25 0c 00 70 02 0b 00 70 | 02 64 05 00 01 0c 00 78 |%..p...p|.d.....x|
|00001030| 02 00 00 00 00 97 00 4f | 00 00 00 20 44 65 63 6c |.......O|... Decl|
|00001040| 61 72 65 20 75 73 65 72 | 2d 64 65 66 69 6e 65 64 |are user|-defined|
|00001050| 20 74 79 70 65 20 28 61 | 20 64 61 74 61 20 73 74 | type (a| data st|
|00001060| 72 75 63 74 75 72 65 29 | 20 66 6f 72 20 72 61 6e |ructure)| for ran|
|00001070| 64 6f 6d 2d 61 63 63 65 | 73 73 20 66 69 6c 65 20 |dom-acce|ss file |
|00001080| 72 65 63 6f 72 64 73 2e | 00 00 00 20 00 76 09 83 |records.|... .v..|
|00001090| 02 00 10 19 00 8d 02 16 | 00 01 00 10 00 97 00 1e |........|........|
|000010a0| 00 24 00 46 69 72 73 74 | 20 65 6c 65 6d 65 6e 74 |.$.First| element|
|000010b0| 20 69 73 20 63 61 72 64 | 20 6e 75 6d 62 65 72 00 | is card| number.|
|000010c0| 10 19 00 98 02 7c 01 06 | 00 25 00 10 00 97 00 28 |.....|..|.%.....(|
|000010d0| 00 24 00 4e 61 6d 65 73 | 20 28 69 6e 20 6f 72 64 |.$.Names| (in ord|
|000010e0| 65 72 20 66 6f 72 20 61 | 6c 70 68 61 62 65 74 69 |er for a|lphabeti|
|000010f0| 63 61 6c 20 73 6f 72 74 | 29 00 10 19 00 a1 02 7c |cal sort|)......||
|00001100| 01 06 00 1f 00 10 00 97 | 00 13 00 24 00 4e 6f 74 |........|...$.Not|
|00001110| 65 20 61 62 6f 75 74 20 | 70 65 72 73 6f 6e 6f 00 |e about |persono.|
|00001120| 10 19 00 a9 02 16 00 01 | 00 10 00 97 00 0d 00 24 |........|.......$|
|00001130| 00 42 69 72 74 68 20 6d | 6f 6e 74 68 74 00 10 19 |.Birth m|ontht...|
|00001140| 00 b2 02 16 00 01 00 10 | 00 97 00 0b 00 24 00 42 |........|.....$.B|
|00001150| 69 72 74 68 20 64 61 79 | 74 00 10 19 00 b9 02 16 |irth day|t.......|
|00001160| 00 01 00 10 00 97 00 0c | 00 24 00 42 69 72 74 68 |........|.$.Birth|
|00001170| 20 79 65 61 72 00 10 19 | 00 c1 02 7c 01 06 00 0c | year...|...|....|
|00001180| 00 10 00 97 00 0e 00 24 | 00 50 68 6f 6e 65 20 6e |.......$|.Phone n|
|00001190| 75 6d 62 65 72 00 10 19 | 00 ca 02 7c 01 06 00 1d |umber...|...|....|
|000011a0| 00 10 00 97 00 10 00 24 | 00 53 74 72 65 65 74 20 |.......$|.Street |
|000011b0| 61 64 64 72 65 73 73 00 | 10 19 00 d4 02 7c 01 06 |address.|.....|..|
|000011c0| 00 0d 00 10 00 97 00 06 | 00 24 00 43 69 74 79 00 |........|.$.City.|
|000011d0| 10 19 00 dc 02 7c 01 06 | 00 02 00 10 00 97 00 07 |.....|..|........|
|000011e0| 00 24 00 53 74 61 74 65 | 00 00 10 19 00 e5 02 7c |.$.State|.......||
|000011f0| 01 06 00 05 00 10 00 97 | 00 0a 00 24 00 5a 69 70 |........|...$.Zip|
|00001200| 20 63 6f 64 65 00 00 1d | 00 ff ff 00 00 00 00 97 | code...|........|
|00001210| 00 29 00 00 00 20 53 55 | 42 20 70 72 6f 63 65 64 |.)... SU|B proced|
|00001220| 75 72 65 20 64 65 63 6c | 61 72 61 74 69 6f 6e 73 |ure decl|arations|
|00001230| 20 62 65 67 69 6e 20 68 | 65 72 65 2e 74 00 00 00 | begin h|ere.t...|
|00001240| 00 44 00 06 00 ec 02 00 | 01 00 00 00 00 00 00 44 |.D......|.......D|
|00001250| 00 18 00 f5 02 00 01 03 | 00 05 03 00 02 05 00 0f |........|........|
|00001260| 03 00 02 01 00 1a 03 00 | 02 01 00 00 00 44 00 18 |........|.....D..|
|00001270| 00 26 03 00 01 03 00 05 | 03 00 02 05 00 0f 03 00 |.&......|........|
|00001280| 02 01 00 1a 03 00 02 01 | 00 00 00 44 00 0c 00 32 |........|...D...2|
|00001290| 03 00 01 01 00 1a 03 00 | 02 01 00 00 00 44 00 06 |........|.....D..|
|000012a0| 00 3d 03 00 01 00 00 00 | 00 44 00 06 00 4a 03 00 |.=......|.D...J..|
|000012b0| 01 00 00 00 00 44 00 0c | 00 57 03 00 01 01 00 63 |.....D..|.W.....c|
|000012c0| 03 00 20 83 02 00 00 44 | 00 0c 00 6b 03 00 01 01 |.. ....D|...k....|
|000012d0| 00 1a 03 00 02 01 00 00 | 00 44 00 0c 00 78 03 00 |........|.D...x..|
|000012e0| 01 01 00 63 03 00 20 83 | 02 00 00 44 00 12 00 86 |...c.. .|...D....|
|000012f0| 03 00 01 02 00 93 03 00 | 02 01 00 1a 03 00 02 01 |........|........|
|00001300| 00 00 00 44 00 06 00 a0 | 03 00 01 00 00 00 00 44 |...D....|.......D|
|00001310| 00 0c 00 b0 03 00 01 01 | 00 bf 03 00 20 83 02 00 |........|.... ...|
|00001320| 00 44 00 06 00 cb 03 00 | 01 00 00 00 00 44 00 06 |.D......|.....D..|
|00001330| 00 db 03 00 01 00 00 00 | 00 44 00 12 00 ea 03 00 |........|.D......|
|00001340| 01 02 00 0f 03 00 02 01 | 00 1a 03 00 02 01 00 00 |........|........|
|00001350| 00 00 00 97 00 2e 00 00 | 00 20 46 55 4e 43 54 49 |........|. FUNCTI|
|00001360| 4f 4e 20 70 72 6f 63 65 | 64 75 72 65 20 64 65 63 |ON proce|dure dec|
|00001370| 6c 61 72 61 74 69 6f 6e | 73 20 62 65 67 69 6e 20 |laration|s begin |
|00001380| 68 65 72 65 2e 00 00 44 | 00 18 00 f7 03 85 02 03 |here...D|........|
|00001390| 00 05 04 00 02 05 00 11 | 04 00 02 01 00 1b 04 00 |........|........|
|000013a0| 02 01 00 00 00 44 00 12 | 00 28 04 81 02 02 00 0f |.....D..|.(......|
|000013b0| 03 00 02 01 00 1a 03 00 | 02 01 00 00 00 44 00 1e |........|.....D..|
|000013c0| 00 34 04 85 02 04 00 3e | 04 00 02 05 00 45 04 00 |.4.....>|.....E..|
|000013d0| 02 01 00 4c 04 00 02 01 | 00 11 04 00 02 01 00 00 |...L....|........|
|000013e0| 00 44 00 06 00 56 04 81 | 02 00 00 00 00 00 00 97 |.D...V..|........|
|000013f0| 00 23 00 00 00 20 50 72 | 6f 63 65 64 75 72 65 20 |.#... Pr|ocedure |
|00001400| 64 65 63 6c 61 72 61 74 | 69 6f 6e 73 20 65 6e 64 |declarat|ions end|
|00001410| 20 68 65 72 65 2e 62 00 | 00 00 00 00 00 97 00 28 | here.b.|.......(|
|00001420| 00 00 00 20 44 65 66 69 | 6e 65 20 61 20 64 75 6d |... Defi|ne a dum|
|00001430| 6d 79 20 72 65 63 6f 72 | 64 20 61 73 20 61 20 77 |my recor|d as a w|
|00001440| 6f 72 6b 20 63 61 72 64 | 2e 00 00 7d 01 ff ff 15 |ork card|...}....|
|00001450| 00 83 02 09 00 0d 00 63 | 03 00 00 00 00 97 00 2f |.......c|......./|
|00001460| 00 00 00 0d 0f 2a 20 44 | 65 63 6c 61 72 61 74 69 |.....* D|eclarati|
|00001470| 6f 6e 73 20 61 6e 64 20 | 64 65 66 69 6e 69 74 69 |ons and |definiti|
|00001480| 6f 6e 73 20 65 6e 64 20 | 68 65 72 65 20 0d 14 2a |ons end |here ..*|
|00001490| 00 00 00 00 00 97 00 36 | 00 00 00 20 54 68 65 20 |.......6|... The |
|000014a0| 65 78 65 63 75 74 69 6f | 6e 2d 73 65 71 75 65 6e |executio|n-sequen|
|000014b0| 63 65 20 6c 6f 67 69 63 | 20 6f 66 20 51 43 41 52 |ce logic| of QCAR|
|000014c0| 44 53 20 62 65 67 69 6e | 73 20 68 65 72 65 2e 00 |DS begin|s here..|
|000014d0| 00 00 00 97 00 3c 00 00 | 00 20 4f 70 65 6e 20 64 |.....<..|. Open d|
|000014e0| 61 74 61 20 66 69 6c 65 | 20 51 43 41 52 44 53 2e |ata file| QCARDS.|
|000014f0| 44 41 54 20 66 6f 72 20 | 72 61 6e 64 6f 6d 20 61 |DAT for |random a|
|00001500| 63 63 65 73 73 20 75 73 | 69 6e 67 20 66 69 6c 65 |ccess us|ing file|
|00001510| 20 23 31 00 00 00 00 0b | 14 0d 02 64 05 8a 00 0b | #1.....|...d....|
|00001520| 00 63 03 2d 01 ff ff ca | 00 04 00 00 00 00 00 00 |.c.-....|........|
|00001530| 00 97 00 41 00 00 00 20 | 54 6f 20 63 6f 75 6e 74 |...A... |To count|
|00001540| 20 72 65 63 6f 72 64 73 | 20 69 6e 20 66 69 6c 65 | records| in file|
|00001550| 2c 20 64 69 76 69 64 65 | 20 74 68 65 20 6c 65 6e |, divide| the len|
|00001560| 67 74 68 20 6f 66 20 74 | 68 65 20 66 69 6c 65 20 |gth of t|he file |
|00001570| 62 79 20 74 68 65 20 00 | 00 97 00 41 00 00 00 20 |by the .|...A... |
|00001580| 6c 65 6e 67 74 68 20 6f | 66 20 61 20 73 69 6e 67 |length o|f a sing|
|00001590| 6c 65 20 72 65 63 6f 72 | 64 3b 20 75 73 65 20 69 |le recor|d; use i|
|000015a0| 6e 74 65 67 65 72 20 64 | 69 76 69 73 69 6f 6e 20 |nteger d|ivision |
|000015b0| 28 5c 29 20 69 6e 73 74 | 65 61 64 20 6f 66 20 00 |(\) inst|ead of .|
|000015c0| 00 97 00 3f 00 00 00 20 | 6e 6f 72 6d 61 6c 20 64 |...?... |normal d|
|000015d0| 69 76 69 73 69 6f 6e 20 | 28 2f 29 2e 20 41 73 73 |ivision |(/). Ass|
|000015e0| 69 67 6e 20 74 68 65 20 | 72 65 73 75 6c 74 69 6e |ign the |resultin|
|000015f0| 67 20 76 61 6c 75 65 20 | 74 6f 20 4c 61 73 74 43 |g value |to LastC|
|00001600| 61 72 64 2e 6f 00 00 00 | 00 64 05 2f 01 0b 00 63 |ard.o...|.d./...c|
|00001610| 03 2d 01 ff ff 60 01 0c | 00 1a 03 00 00 00 00 00 |.-...`..|........|
|00001620| 00 00 00 00 00 97 00 40 | 00 00 00 20 52 65 64 65 |.......@|... Rede|
|00001630| 66 69 6e 65 20 74 68 65 | 20 49 6e 64 65 78 20 61 |fine the| Index a|
|00001640| 72 72 61 79 20 74 6f 20 | 68 6f 6c 64 20 74 68 65 |rray to |hold the|
|00001650| 20 72 65 63 6f 72 64 73 | 20 69 6e 20 74 68 65 20 | records| in the |
|00001660| 66 69 6c 65 20 70 6c 75 | 73 00 00 97 00 3c 00 00 |file plu|s....<..|
|00001670| 00 20 32 30 20 65 78 74 | 72 61 20 28 74 68 65 20 |. 20 ext|ra (the |
|00001680| 65 78 74 72 61 20 72 65 | 63 6f 72 64 73 20 61 6c |extra re|cords al|
|00001690| 6c 6f 77 20 74 68 65 20 | 75 73 65 72 20 74 6f 20 |low the |user to |
|000016a0| 61 64 64 20 63 61 72 64 | 73 29 2e 00 00 97 00 3c |add card|s).....<|
|000016b0| 00 00 00 20 54 68 69 73 | 20 61 72 72 61 79 20 69 |... This| array i|
|000016c0| 73 20 64 79 6e 61 6d 69 | 63 20 2d 20 74 68 69 73 |s dynami|c - this|
|000016d0| 20 6d 65 61 6e 73 20 74 | 68 65 20 6e 75 6d 62 65 | means t|he numbe|
|000016e0| 72 20 6f 66 20 65 6c 65 | 6d 65 6e 74 73 00 00 97 |r of ele|ments...|
|000016f0| 00 37 00 00 00 20 69 6e | 20 49 6e 64 65 78 28 29 |.7... in| Index()|
|00001700| 20 76 61 72 69 65 73 20 | 64 65 70 65 6e 64 69 6e | varies |dependin|
|00001710| 67 20 6f 6e 20 74 68 65 | 20 73 69 7a 65 20 6f 66 |g on the| size of|
|00001720| 20 74 68 65 20 66 69 6c | 65 2e 6d 00 00 97 00 3d | the fil|e.m....=|
|00001730| 00 00 00 20 41 6c 73 6f | 2c 20 49 6e 64 65 78 28 |... Also|, Index(|
|00001740| 29 20 69 73 20 61 20 73 | 68 61 72 65 64 20 70 72 |) is a s|hared pr|
|00001750| 6f 63 65 64 75 72 65 2c | 20 73 6f 20 69 74 20 69 |ocedure,| so it i|
|00001760| 73 20 61 76 61 69 6c 61 | 62 6c 65 20 74 6f 00 00 |s availa|ble to..|
|00001770| 00 97 00 32 00 00 00 20 | 61 6c 6c 20 53 55 42 20 |...2... |all SUB |
|00001780| 61 6e 64 20 46 55 4e 43 | 54 49 4f 4e 20 70 72 6f |and FUNC|TION pro|
|00001790| 63 65 64 75 72 65 73 20 | 69 6e 20 74 68 65 20 70 |cedures |in the p|
|000017a0| 72 6f 67 72 61 6d 2e 00 | 00 97 00 02 00 00 00 00 |rogram..|........|
|000017b0| 00 97 00 3e 00 00 00 20 | 4e 6f 74 65 20 74 68 61 |...>... |Note tha|
|000017c0| 74 20 61 6e 20 65 72 72 | 6f 72 20 74 72 61 70 20 |t an err|or trap |
|000017d0| 6c 65 74 73 20 51 43 41 | 52 44 53 20 74 65 72 6d |lets QCA|RDS term|
|000017e0| 69 6e 61 74 65 20 77 69 | 74 68 20 61 6e 20 65 72 |inate wi|th an er|
|000017f0| 72 6f 72 00 00 97 00 3b | 00 00 00 20 6d 65 73 73 |ror....;|... mess|
|00001800| 61 67 65 20 69 66 20 74 | 68 65 20 6d 65 6d 6f 72 |age if t|he memor|
|00001810| 79 20 61 76 61 69 6c 61 | 62 6c 65 20 69 73 20 6e |y availa|ble is n|
|00001820| 6f 74 20 73 75 66 66 69 | 63 69 65 6e 74 2e 20 49 |ot suffi|cient. I|
|00001830| 66 20 6e 6f 72 00 00 97 | 00 40 00 00 00 20 65 72 |f nor...|.@... er|
|00001840| 72 6f 72 20 69 73 20 64 | 65 74 65 63 74 65 64 2c |ror is d|etected,|
|00001850| 20 74 68 65 20 65 72 72 | 6f 72 20 74 72 61 70 20 | the err|or trap |
|00001860| 69 73 20 74 75 72 6e 65 | 64 20 6f 66 66 20 66 6f |is turne|d off fo|
|00001870| 6c 6c 6f 77 69 6e 67 20 | 74 68 65 00 00 97 00 13 |llowing |the.....|
|00001880| 00 00 00 20 52 45 44 49 | 4d 20 73 74 61 74 65 6d |... REDI|M statem|
|00001890| 65 6e 74 2e 64 00 00 00 | 00 67 00 65 04 00 00 1a |ent.d...|.g.e....|
|000018a0| 00 64 05 0b 00 1a 03 65 | 01 14 00 00 01 15 00 83 |.d.....e|........|
|000018b0| 02 27 00 0e 00 02 00 72 | 04 1c 00 00 00 67 00 ff |.'.....r|.....g..|
|000018c0| ff 00 00 00 00 00 00 97 | 00 3d 00 00 00 20 55 73 |........|.=... Us|
|000018d0| 65 20 74 68 65 20 62 6c | 6f 63 6b 20 49 46 2e 2e |e the bl|ock IF..|
|000018e0| 2e 54 48 45 4e 2e 2e 2e | 45 4c 53 45 20 73 74 61 |.THEN...|ELSE sta|
|000018f0| 74 65 6d 65 6e 74 20 74 | 6f 20 64 65 63 69 64 65 |tement t|o decide|
|00001900| 20 77 68 65 74 68 65 72 | 74 00 00 97 00 3d 00 00 | whether|t....=..|
|00001910| 00 20 74 6f 20 6c 6f 61 | 64 20 74 68 65 20 72 65 |. to loa|d the re|
|00001920| 63 6f 72 64 73 20 66 72 | 6f 6d 20 74 68 65 20 64 |cords fr|om the d|
|00001930| 69 73 6b 20 66 69 6c 65 | 20 51 43 41 52 44 53 2e |isk file| QCARDS.|
|00001940| 44 41 54 20 69 6e 74 6f | 20 74 68 65 74 00 00 97 |DAT into| thet...|
|00001950| 00 3e 00 00 00 20 61 72 | 72 61 79 20 6f 66 20 72 |.>... ar|ray of r|
|00001960| 65 63 6f 72 64 73 20 63 | 61 6c 6c 65 64 20 49 6e |ecords c|alled In|
|00001970| 64 65 78 28 29 20 64 65 | 63 6c 61 72 65 64 20 65 |dex() de|clared e|
|00001980| 61 72 6c 69 65 72 2e 20 | 49 6e 20 74 68 65 20 49 |arlier. |In the I|
|00001990| 46 00 00 97 00 3c 00 00 | 00 20 70 61 72 74 2c 20 |F....<..|. part, |
|000019a0| 79 6f 75 20 77 69 6c 6c | 20 63 68 65 63 6b 20 74 |you will| check t|
|000019b0| 6f 20 73 65 65 20 69 66 | 20 74 68 65 72 65 20 61 |o see if| there a|
|000019c0| 72 65 20 61 63 74 75 61 | 6c 6c 79 20 72 65 63 6f |re actua|lly reco|
|000019d0| 72 64 73 00 00 97 00 3e | 00 00 00 20 69 6e 20 74 |rds....>|... in t|
|000019e0| 68 65 20 66 69 6c 65 2e | 20 49 66 20 74 68 65 72 |he file.| If ther|
|000019f0| 65 20 61 72 65 2c 20 4c | 61 73 74 43 61 72 64 20 |e are, L|astCard |
|00001a00| 77 69 6c 6c 20 62 65 20 | 67 72 65 61 74 65 72 20 |will be |greater |
|00001a10| 74 68 61 6e 20 30 2c 00 | 00 97 00 3f 00 00 00 20 |than 0,.|...?... |
|00001a20| 61 6e 64 20 79 6f 75 20 | 63 61 6e 20 63 61 6c 6c |and you |can call|
|00001a30| 20 74 68 65 20 49 6e 69 | 74 49 6e 64 65 78 20 70 | the Ini|tIndex p|
|00001a40| 72 6f 63 65 64 75 72 65 | 20 74 6f 20 6c 6f 61 64 |rocedure| to load|
|00001a50| 20 74 68 65 20 72 65 63 | 6f 72 64 73 00 00 00 97 | the rec|ords....|
|00001a60| 00 3d 00 00 00 20 69 6e | 74 6f 20 49 6e 64 65 78 |.=... in|to Index|
|00001a70| 28 29 2e 20 4c 61 73 74 | 43 61 72 64 20 69 73 20 |(). Last|Card is |
|00001a80| 30 20 69 66 20 74 68 65 | 72 65 20 61 72 65 20 6e |0 if the|re are n|
|00001a90| 6f 20 72 65 63 6f 72 64 | 73 20 69 6e 20 74 68 65 |o record|s in the|
|00001aa0| 64 00 00 97 00 3a 00 00 | 00 20 66 69 6c 65 20 79 |d....:..|. file y|
|00001ab0| 65 74 2e 20 49 66 20 74 | 68 65 72 65 20 61 72 65 |et. If t|here are|
|00001ac0| 20 6e 6f 20 72 65 63 6f | 72 64 73 20 69 6e 20 74 | no reco|rds in t|
|00001ad0| 68 65 20 66 69 6c 65 2c | 20 74 68 65 20 45 4c 53 |he file,| the ELS|
|00001ae0| 45 00 00 97 00 3e 00 00 | 00 20 63 6c 61 75 73 65 |E....>..|. clause|
|00001af0| 20 69 73 20 65 78 65 63 | 75 74 65 64 2e 20 54 68 | is exec|uted. Th|
|00001b00| 65 20 63 6f 64 65 20 62 | 65 74 77 65 65 6e 20 45 |e code b|etween E|
|00001b10| 4c 53 45 20 61 6e 64 20 | 45 4e 44 20 49 46 20 73 |LSE and |END IF s|
|00001b20| 74 61 72 74 73 00 00 97 | 00 1f 00 00 00 20 74 68 |tarts...|..... th|
|00001b30| 65 20 49 6e 64 65 78 28 | 29 20 61 72 72 61 79 20 |e Index(|) array |
|00001b40| 61 74 20 63 61 72 64 20 | 31 2e 20 00 00 00 00 0b |at card |1. .....|
|00001b50| 00 1a 03 64 01 71 01 61 | 00 00 00 00 10 0b 00 1a |...d.q.a|........|
|00001b60| 03 37 00 01 00 6b 03 00 | 00 49 00 ff ff 00 10 64 |.7...k..|.I.....d|
|00001b70| 05 0b 00 63 03 12 00 8d | 02 00 10 0b 00 63 03 64 |...c....|.....c.d|
|00001b80| 05 0f 00 01 00 72 04 00 | 10 64 05 8a 00 64 05 0b |.....r..|.d...d..|
|00001b90| 00 63 03 df 00 ff ff 00 | 00 50 00 00 00 00 00 00 |.c......|.P......|
|00001ba0| 00 00 00 97 00 37 00 00 | 00 20 55 73 65 20 74 68 |.....7..|. Use th|
|00001bb0| 65 20 44 72 61 77 43 61 | 72 64 73 20 70 72 6f 63 |e DrawCa|rds proc|
|00001bc0| 65 64 75 72 65 20 74 6f | 20 69 6e 69 74 69 61 6c |edure to| initial|
|00001bd0| 69 7a 65 20 74 68 65 20 | 73 63 72 65 65 6e 20 00 |ize the |screen .|
|00001be0| 00 97 00 3a 00 00 00 20 | 61 6e 64 20 64 72 61 77 |...:... |and draw|
|00001bf0| 20 74 68 65 20 63 61 72 | 64 73 2e 20 54 68 65 6e | the car|ds. Then|
|00001c00| 2c 20 73 65 74 20 74 68 | 65 20 66 69 72 73 74 20 |, set th|e first |
|00001c10| 63 61 72 64 20 61 73 20 | 74 68 65 20 74 6f 70 00 |card as |the top.|
|00001c20| 00 97 00 39 00 00 00 20 | 63 61 72 64 2e 20 46 69 |...9... |card. Fi|
|00001c30| 6e 61 6c 6c 79 2c 20 70 | 61 73 73 20 74 68 65 20 |nally, p|ass the |
|00001c40| 76 61 72 69 61 62 6c 65 | 73 20 54 6f 70 43 61 72 |variable|s TopCar|
|00001c50| 64 20 61 6e 64 20 4c 61 | 73 74 43 61 72 64 70 00 |d and La|stCardp.|
|00001c60| 00 97 00 37 00 00 00 20 | 61 73 20 61 72 67 75 6d |...7... |as argum|
|00001c70| 65 6e 74 73 20 74 6f 20 | 74 68 65 20 53 68 6f 77 |ents to |the Show|
|00001c80| 43 61 72 64 73 20 70 72 | 6f 63 65 64 75 72 65 2e |Cards pr|ocedure.|
|00001c90| 20 54 68 65 20 63 61 6c | 6c 20 74 6f 72 00 00 97 | The cal|l tor...|
|00001ca0| 00 39 00 00 00 20 53 68 | 6f 77 43 61 72 64 73 20 |.9... Sh|owCards |
|00001cb0| 70 6c 61 63 65 73 20 61 | 6c 6c 20 74 68 65 20 64 |places a|ll the d|
|00001cc0| 61 74 61 20 66 6f 72 20 | 54 6f 70 43 61 72 64 20 |ata for |TopCard |
|00001cd0| 6f 6e 20 74 68 65 20 66 | 72 6f 6e 74 00 00 00 97 |on the f|ront....|
|00001ce0| 00 32 00 00 00 20 63 61 | 72 64 20 6f 6e 20 74 68 |.2... ca|rd on th|
|00001cf0| 65 20 73 63 72 65 65 6e | 2c 20 74 68 65 6e 20 69 |e screen|, then i|
|00001d00| 74 20 70 6c 61 63 65 73 | 20 74 68 65 20 74 6f 70 |t places| the top|
|00001d10| 2d 6c 69 6e 65 00 00 97 | 00 3a 00 00 00 20 69 6e |-line...|.:... in|
|00001d20| 66 6f 72 6d 61 74 69 6f | 6e 20 28 74 68 65 20 70 |formatio|n (the p|
|00001d30| 65 72 73 6f 6e 27 73 20 | 6e 61 6d 65 29 20 6f 6e |erson's |name) on|
|00001d40| 20 74 68 65 20 72 65 6d | 61 69 6e 69 6e 67 20 63 | the rem|aining c|
|00001d50| 61 72 64 73 2e 00 00 00 | 00 37 00 00 00 4a 03 00 |ards....|.7...J..|
|00001d60| 00 64 05 0c 00 0f 03 00 | 00 0b 00 0f 03 0b 00 1a |.d......|........|
|00001d70| 03 37 00 02 00 ea 03 00 | 00 00 00 00 00 00 00 97 |.7......|........|
|00001d80| 00 3f 00 00 00 20 4b 65 | 65 70 20 74 68 65 20 70 |.?... Ke|ep the p|
|00001d90| 69 63 74 75 72 65 20 6f | 6e 20 74 68 65 20 73 63 |icture o|n the sc|
|00001da0| 72 65 65 6e 20 66 6f 72 | 65 76 65 72 20 77 69 74 |reen for|ever wit|
|00001db0| 68 20 61 6e 20 75 6e 63 | 6f 6e 64 69 74 69 6f 6e |h an unc|ondition|
|00001dc0| 61 6c 00 00 00 97 00 3c | 00 00 00 20 44 4f 2e 2e |al.....<|... DO..|
|00001dd0| 2e 4c 4f 4f 50 20 73 74 | 61 74 65 6d 65 6e 74 2e |.LOOP st|atement.|
|00001de0| 20 54 68 65 20 44 4f 20 | 70 61 72 74 20 6f 66 20 | The DO |part of |
|00001df0| 74 68 65 20 73 74 61 74 | 65 6d 65 6e 74 20 67 6f |the stat|ement go|
|00001e00| 65 73 20 6f 6e 00 00 97 | 00 3d 00 00 00 20 74 68 |es on...|.=... th|
|00001e10| 65 20 6e 65 78 74 20 63 | 6f 64 65 20 6c 69 6e 65 |e next c|ode line|
|00001e20| 2e 20 54 68 65 20 4c 4f | 4f 50 20 70 61 72 74 20 |. The LO|OP part |
|00001e30| 67 6f 65 73 20 6a 75 73 | 74 20 62 65 66 6f 72 65 |goes jus|t before|
|00001e40| 20 74 68 65 20 45 4e 44 | 00 00 00 97 00 3c 00 00 | the END|.....<..|
|00001e50| 00 20 73 74 61 74 65 6d | 65 6e 74 2e 20 54 68 69 |. statem|ent. Thi|
|00001e60| 73 20 6c 6f 6f 70 20 65 | 6e 63 6c 6f 73 65 73 20 |s loop e|ncloses |
|00001e70| 74 68 65 20 63 65 6e 74 | 72 61 6c 20 6c 6f 67 69 |the cent|ral logi|
|00001e80| 63 20 74 68 61 74 20 6c | 65 74 73 00 00 97 00 1f |c that l|ets.....|
|00001e90| 00 00 00 20 61 20 75 73 | 65 72 20 69 6e 74 65 72 |... a us|er inter|
|00001ea0| 61 63 74 20 77 69 74 68 | 20 51 43 41 52 44 53 2e |act with| QCARDS.|
|00001eb0| 73 00 00 00 00 46 00 00 | 00 00 00 00 00 00 00 97 |s....F..|........|
|00001ec0| 00 3d 00 00 00 20 47 65 | 74 20 75 73 65 72 20 6b |.=... Ge|t user k|
|00001ed0| 65 79 73 74 72 6f 6b 65 | 20 77 69 74 68 20 61 20 |eystroke| with a |
|00001ee0| 63 6f 6e 64 69 74 69 6f | 6e 61 6c 20 44 4f 2e 2e |conditio|nal DO..|
|00001ef0| 2e 4c 4f 4f 50 20 73 74 | 61 74 65 6d 65 6e 74 2e |.LOOP st|atement.|
|00001f00| 00 00 00 97 00 3d 00 00 | 00 20 57 69 74 68 69 6e |.....=..|. Within|
|00001f10| 20 74 68 65 20 6c 6f 6f | 70 2c 20 75 73 65 20 74 | the loo|p, use t|
|00001f20| 68 65 20 49 4e 4b 45 59 | 24 20 66 75 6e 63 74 69 |he INKEY|$ functi|
|00001f30| 6f 6e 20 74 6f 20 63 61 | 70 74 75 72 65 20 61 20 |on to ca|pture a |
|00001f40| 75 73 65 72 00 00 00 97 | 00 3e 00 00 00 20 6b 65 |user....|.>... ke|
|00001f50| 79 73 74 72 6f 6b 65 2c | 20 77 68 69 63 68 20 69 |ystroke,| which i|
|00001f60| 73 20 74 68 65 6e 20 61 | 73 73 69 67 6e 65 64 20 |s then a|ssigned |
|00001f70| 74 6f 20 61 20 73 74 72 | 69 6e 67 20 76 61 72 69 |to a str|ing vari|
|00001f80| 61 62 6c 65 2e 20 54 68 | 65 00 00 97 00 37 00 00 |able. Th|e....7..|
|00001f90| 00 20 57 48 49 4c 45 20 | 70 61 72 74 20 6f 66 20 |. WHILE |part of |
|00001fa0| 74 68 65 20 4c 4f 4f 50 | 20 6c 69 6e 65 20 6b 65 |the LOOP| line ke|
|00001fb0| 65 70 73 20 74 65 73 74 | 69 6e 67 20 74 68 65 20 |eps test|ing the |
|00001fc0| 73 74 72 69 6e 67 6c 00 | 00 97 00 3d 00 00 00 20 |stringl.|...=... |
|00001fd0| 76 61 72 69 61 62 6c 65 | 2e 20 55 6e 74 69 6c 20 |variable|. Until |
|00001fe0| 61 20 6b 65 79 20 69 73 | 20 70 72 65 73 73 65 64 |a key is| pressed|
|00001ff0| 2c 20 49 4e 4b 45 59 24 | 20 6b 65 65 70 73 20 72 |, INKEY$| keeps r|
|00002000| 65 74 75 72 6e 69 6e 67 | 20 61 65 00 00 97 00 3a |eturning| ae....:|
|00002010| 00 00 00 20 6e 75 6c 6c | 20 28 74 68 61 74 20 69 |... null| (that i|
|00002020| 73 20 61 20 7a 65 72 6f | 2d 6c 65 6e 67 74 68 29 |s a zero|-length)|
|00002030| 20 73 74 72 69 6e 67 2c | 20 72 65 70 72 65 73 65 | string,| represe|
|00002040| 6e 74 65 64 20 62 79 20 | 22 22 2e 00 00 97 00 38 |nted by |"".....8|
|00002050| 00 00 00 20 57 68 65 6e | 20 61 20 6b 65 79 20 69 |... When| a key i|
|00002060| 73 20 70 72 65 73 73 65 | 64 2c 20 49 4e 4b 45 59 |s presse|d, INKEY|
|00002070| 24 20 72 65 74 75 72 6e | 73 20 61 20 73 74 72 69 |$ return|s a stri|
|00002080| 6e 67 20 77 69 74 68 20 | 61 00 00 97 00 35 00 00 |ng with |a....5..|
|00002090| 00 20 6c 65 6e 67 74 68 | 20 67 72 65 61 74 65 72 |. length| greater|
|000020a0| 20 74 68 61 6e 20 7a 65 | 72 6f 2c 20 61 6e 64 20 | than ze|ro, and |
|000020b0| 74 68 65 20 6c 6f 6f 70 | 20 74 65 72 6d 69 6e 61 |the loop| termina|
|000020c0| 74 65 73 2e 68 00 00 00 | 00 97 00 30 00 00 00 20 |tes.h...|...0... |
|000020d0| 44 4f 2e 2e 2e 4c 4f 4f | 50 20 77 69 74 68 20 74 |DO...LOO|P with t|
|000020e0| 65 73 74 20 61 74 20 74 | 68 65 20 62 6f 74 74 6f |est at t|he botto|
|000020f0| 6d 20 6f 66 20 74 68 65 | 20 6c 6f 6f 70 00 10 46 |m of the| loop..F|
|00002100| 00 00 1c 20 01 0c 14 05 | 03 00 10 0b 14 05 03 6d |... ....|.......m|
|00002110| 01 00 00 03 01 64 00 ff | ff 00 00 00 00 00 00 00 |.....d..|........|
|00002120| 00 00 00 97 00 3e 00 00 | 00 20 55 73 65 20 74 68 |.....>..|. Use th|
|00002130| 65 20 4c 45 4e 20 66 75 | 6e 63 74 69 6f 6e 20 74 |e LEN fu|nction t|
|00002140| 6f 20 66 69 6e 64 20 6f | 75 74 20 77 68 65 74 68 |o find o|ut wheth|
|00002150| 65 72 20 43 68 6f 69 63 | 65 24 20 69 73 20 67 72 |er Choic|e$ is gr|
|00002160| 65 61 74 65 72 00 00 97 | 00 3e 00 00 00 20 74 68 |eater...|.>... th|
|00002170| 61 6e 20 61 20 73 69 6e | 67 6c 65 20 63 68 61 72 |an a sin|gle char|
|00002180| 61 63 74 65 72 20 28 69 | 2e 65 2e 20 61 20 73 69 |acter (i|.e. a si|
|00002190| 6e 67 6c 65 20 62 79 74 | 65 29 2e 20 49 66 20 43 |ngle byt|e). If C|
|000021a0| 68 6f 69 63 65 24 20 69 | 73 00 00 97 00 3e 00 00 |hoice$ i|s....>..|
|000021b0| 00 20 61 20 73 69 6e 67 | 6c 65 20 63 68 61 72 61 |. a sing|le chara|
|000021c0| 63 74 65 72 20 28 74 68 | 61 74 20 69 73 2c 20 69 |cter (th|at is, i|
|000021d0| 74 20 69 73 20 6c 65 73 | 73 20 74 68 61 6e 20 32 |t is les|s than 2|
|000021e0| 20 62 79 74 65 73 20 6c | 6f 6e 67 29 2c 00 00 97 | bytes l|ong),...|
|000021f0| 00 38 00 00 00 20 74 68 | 65 20 6b 65 79 20 70 72 |.8... th|e key pr|
|00002200| 65 73 73 65 64 20 77 61 | 73 20 61 6e 20 6f 72 64 |essed wa|s an ord|
|00002210| 69 6e 61 72 79 20 22 74 | 79 70 65 77 72 69 74 65 |inary "t|ypewrite|
|00002220| 72 20 6b 65 79 62 6f 61 | 72 64 22 00 00 97 00 3e |r keyboa|rd"....>|
|00002230| 00 00 00 20 63 68 61 72 | 61 63 74 65 72 20 28 74 |... char|acter (t|
|00002240| 68 65 73 65 20 61 72 65 | 20 75 73 75 61 6c 6c 79 |hese are| usually|
|00002250| 20 63 61 6c 6c 65 64 20 | 41 53 43 49 49 20 6b 65 | called |ASCII ke|
|00002260| 79 73 20 62 65 63 61 75 | 73 65 20 74 68 65 79 00 |ys becau|se they.|
|00002270| 00 97 00 3d 00 00 00 20 | 61 72 65 20 70 61 72 74 |...=... |are part|
|00002280| 20 6f 66 20 74 68 65 20 | 41 53 43 49 49 20 63 68 | of the |ASCII ch|
|00002290| 61 72 61 63 74 65 72 20 | 73 65 74 29 2e 20 57 68 |aracter |set). Wh|
|000022a0| 65 6e 20 74 68 65 20 75 | 73 65 72 20 65 6e 74 65 |en the u|ser ente|
|000022b0| 72 73 79 00 00 97 00 41 | 00 00 00 20 61 6e 20 41 |rsy....A|... an A|
|000022c0| 53 43 49 49 20 63 68 61 | 72 61 63 74 65 72 2c 20 |SCII cha|racter, |
|000022d0| 69 74 20 69 6e 64 69 63 | 61 74 65 73 20 61 20 63 |it indic|ates a c|
|000022e0| 68 6f 69 63 65 20 6f 66 | 20 6f 6e 65 20 6f 66 20 |hoice of| one of |
|000022f0| 74 68 65 20 51 43 41 52 | 44 53 00 00 00 97 00 3e |the QCAR|DS.....>|
|00002300| 00 00 00 20 63 6f 6d 6d | 61 6e 64 73 20 66 72 6f |... comm|ands fro|
|00002310| 6d 20 74 68 65 20 63 6f | 6d 6d 61 6e 64 20 6c 69 |m the co|mmand li|
|00002320| 6e 65 20 61 74 20 74 68 | 65 20 62 6f 74 74 6f 6d |ne at th|e bottom|
|00002330| 20 6f 66 20 74 68 65 20 | 73 63 72 65 65 6e 2e 00 | of the |screen..|
|00002340| 00 97 00 3e 00 00 00 20 | 49 66 20 74 68 65 20 75 |...>... |If the u|
|00002350| 73 65 72 20 64 69 64 20 | 70 72 65 73 73 20 61 6e |ser did |press an|
|00002360| 20 41 53 43 49 49 20 6b | 65 79 2c 20 75 73 65 20 | ASCII k|ey, use |
|00002370| 74 68 65 20 4c 43 41 53 | 45 24 20 66 75 6e 63 74 |the LCAS|E$ funct|
|00002380| 69 6f 6e 00 00 97 00 3f | 00 00 00 20 74 6f 20 63 |ion....?|... to c|
|00002390| 6f 6e 76 65 72 74 20 69 | 74 20 74 6f 20 6c 6f 77 |onvert i|t to low|
|000023a0| 65 72 20 63 61 73 65 20 | 28 69 6e 20 74 68 65 20 |er case |(in the |
|000023b0| 65 76 65 6e 74 20 74 68 | 65 20 63 61 70 69 74 61 |event th|e capita|
|000023c0| 6c 20 6c 65 74 74 65 72 | 00 00 00 97 00 10 00 00 |l letter|........|
|000023d0| 00 20 77 61 73 20 65 6e | 74 65 72 65 64 29 2e 00 |. was en|tered)..|
|000023e0| 00 97 00 02 00 00 00 00 | 00 97 00 3f 00 00 00 20 |........|...?... |
|000023f0| 54 68 65 20 45 4c 53 45 | 20 63 6c 61 75 73 65 20 |The ELSE| clause |
|00002400| 69 73 20 6f 6e 6c 79 20 | 65 78 65 63 75 74 65 64 |is only |executed|
|00002410| 20 69 66 20 43 68 6f 69 | 63 65 24 20 69 73 20 6c | if Choi|ce$ is l|
|00002420| 6f 6e 67 65 72 20 74 68 | 61 6e 20 61 00 00 00 97 |onger th|an a....|
|00002430| 00 3b 00 00 00 20 73 69 | 6e 67 6c 65 20 63 68 61 |.;... si|ngle cha|
|00002440| 72 61 63 74 65 72 20 28 | 61 6e 64 20 74 68 65 72 |racter (|and ther|
|00002450| 65 66 6f 72 65 20 6e 6f | 74 20 61 20 63 6f 6d 6d |efore no|t a comm|
|00002460| 61 6e 64 2d 6c 69 6e 65 | 20 6b 65 79 29 2e 61 00 |and-line| key).a.|
|00002470| 00 97 00 3e 00 00 00 20 | 49 66 20 43 68 6f 69 63 |...>... |If Choic|
|00002480| 65 24 20 69 73 20 6e 6f | 74 20 61 6e 20 41 53 43 |e$ is no|t an ASC|
|00002490| 49 49 20 6b 65 79 2c 20 | 69 74 20 72 65 70 72 65 |II key, |it repre|
|000024a0| 73 65 6e 74 73 20 61 6e | 20 22 65 78 74 65 6e 64 |sents an| "extend|
|000024b0| 65 64 22 00 00 97 00 3c | 00 00 00 20 6b 65 79 2e |ed"....<|... key.|
|000024c0| 20 28 54 68 65 20 65 78 | 74 65 6e 64 65 64 20 6b | (The ex|tended k|
|000024d0| 65 79 73 20 69 6e 63 6c | 75 64 65 20 74 68 65 20 |eys incl|ude the |
|000024e0| 44 49 52 45 43 54 49 4f | 4e 20 6b 65 79 73 20 6f |DIRECTIO|N keys o|
|000024f0| 6e 20 74 68 65 00 00 97 | 00 3b 00 00 00 20 6e 75 |n the...|.;... nu|
|00002500| 6d 65 72 69 63 20 6b 65 | 79 70 61 64 2c 20 77 68 |meric ke|ypad, wh|
|00002510| 69 63 68 20 69 73 20 77 | 68 79 20 51 43 41 52 44 |ich is w|hy QCARD|
|00002520| 53 20 6c 6f 6f 6b 73 20 | 66 6f 72 20 74 68 65 6d |S looks |for them|
|00002530| 2e 29 20 54 68 65 65 00 | 00 97 00 39 00 00 00 20 |.) Thee.|...9... |
|00002540| 52 49 47 48 54 24 20 66 | 75 6e 63 74 69 6f 6e 20 |RIGHT$ f|unction |
|00002550| 69 73 20 74 68 65 6e 20 | 75 73 65 64 20 74 72 69 |is then |used tri|
|00002560| 6d 20 61 77 61 79 20 74 | 68 65 20 65 78 74 72 61 |m away t|he extra|
|00002570| 20 62 79 74 65 2c 68 00 | 00 97 00 3e 00 00 00 20 | byte,h.|...>... |
|00002580| 6c 65 61 76 69 6e 67 20 | 61 20 76 61 6c 75 65 20 |leaving |a value |
|00002590| 74 68 61 74 20 6d 61 79 | 20 63 6f 72 72 65 73 70 |that may| corresp|
|000025a0| 6f 6e 64 20 74 6f 20 6f | 6e 65 20 6f 66 20 74 68 |ond to o|ne of th|
|000025b0| 65 20 44 49 52 45 43 54 | 49 4f 4e 00 00 97 00 40 |e DIRECT|ION....@|
|000025c0| 00 00 00 20 6b 65 79 73 | 2e 20 55 73 65 20 61 20 |... keys|. Use a |
|000025d0| 53 45 4c 45 43 54 20 43 | 41 53 45 20 63 6f 6e 73 |SELECT C|ASE cons|
|000025e0| 74 72 75 63 74 69 6f 6e | 20 74 6f 20 72 65 73 70 |truction| to resp|
|000025f0| 6f 6e 64 20 74 6f 20 74 | 68 6f 73 65 20 6b 65 79 |ond to t|hose key|
|00002600| 2d 00 00 97 00 38 00 00 | 00 20 70 72 65 73 73 65 |-....8..|. presse|
|00002610| 73 20 74 68 61 74 20 72 | 65 70 72 65 73 65 6e 74 |s that r|epresent|
|00002620| 20 6e 75 6d 65 72 69 63 | 2d 6b 65 79 70 61 64 20 | numeric|-keypad |
|00002630| 44 49 52 45 43 54 49 4f | 4e 20 6b 65 79 73 2e 00 |DIRECTIO|N keys..|
|00002640| 00 00 10 0b 14 05 03 2d | 01 ff ff 64 05 03 01 61 |.......-|...d...a|
|00002650| 00 00 00 00 20 97 00 15 | 00 08 00 20 48 61 6e 64 |.... ...|... Hand|
|00002660| 6c 65 20 41 53 43 49 49 | 20 6b 65 79 73 2e 73 00 |le ASCII| keys.s.|
|00002670| 20 0b 14 05 03 0b 00 0f | 03 0b 00 1a 03 37 00 03 | .......|.....7..|
|00002680| 00 26 03 00 00 00 10 49 | 00 ff ff 00 20 97 00 40 |.&.....I|.... ..@|
|00002690| 00 08 00 20 43 6f 6e 76 | 65 72 74 20 32 2d 62 79 |... Conv|ert 2-by|
|000026a0| 74 65 20 65 78 74 65 6e | 64 65 64 20 63 6f 64 65 |te exten|ded code|
|000026b0| 20 74 6f 20 31 2d 62 79 | 74 65 20 41 53 43 49 49 | to 1-by|te ASCII|
|000026c0| 20 63 6f 64 65 20 61 6e | 64 20 68 61 6e 64 6c 65 | code an|d handle|
|000026d0| 2e 00 20 0b 14 05 03 64 | 05 42 01 0c 14 05 03 00 |.. ....d|.B......|
|000026e0| 20 0b 14 05 03 0b 00 0f | 03 0b 00 1a 03 37 00 03 | .......|.....7..|
|000026f0| 00 f5 02 00 00 00 00 00 | 10 50 00 00 00 00 00 00 |........|.P......|
|00002700| 00 97 00 3d 00 00 00 20 | 41 64 6a 75 73 74 20 74 |...=... |Adjust t|
|00002710| 68 65 20 63 61 72 64 73 | 20 61 63 63 6f 72 64 69 |he cards| accordi|
|00002720| 6e 67 20 74 6f 20 74 68 | 65 20 6b 65 79 20 70 72 |ng to th|e key pr|
|00002730| 65 73 73 65 64 20 62 79 | 20 74 68 65 20 75 73 65 |essed by| the use|
|00002740| 72 2c 6c 00 00 97 00 3c | 00 00 00 20 74 68 65 6e |r,l....<|... then|
|00002750| 20 63 61 6c 6c 20 74 68 | 65 20 53 68 6f 77 43 61 | call th|e ShowCa|
|00002760| 72 64 73 20 70 72 6f 63 | 65 64 75 72 65 20 74 6f |rds proc|edure to|
|00002770| 20 73 68 6f 77 20 61 64 | 6a 75 73 74 65 64 20 73 | show ad|justed s|
|00002780| 74 61 63 6b 2e 00 00 00 | 00 0b 00 0f 03 64 05 63 |tack....|.....d.c|
|00002790| 01 5d 00 00 00 0b 00 1a | 03 0b 00 0f 03 00 01 0c |.]......|........|
|000027a0| 00 0f 03 00 00 0b 00 0f | 03 0b 00 1a 03 5f 01 5d |........|....._.]|
|000027b0| 00 00 00 0b 00 0f 03 0b | 00 1a 03 77 01 0c 00 0f |........|...w....|
|000027c0| 03 00 00 0b 00 0f 03 64 | 01 62 01 5d 00 00 00 64 |.......d|.b.]...d|
|000027d0| 05 0c 00 0f 03 00 00 0b | 00 0f 03 0b 00 1a 03 37 |........|.......7|
|000027e0| 00 02 00 ea 03 00 00 00 | 00 00 00 97 00 33 00 00 |........|.....3..|
|000027f0| 00 20 54 68 69 73 20 69 | 73 20 74 68 65 20 62 6f |. This i|s the bo|
|00002800| 74 74 6f 6d 20 6f 66 20 | 74 68 65 20 75 6e 63 6f |ttom of |the unco|
|00002810| 6e 64 69 74 69 6f 6e 61 | 6c 20 44 4f 20 6c 6f 6f |nditiona|l DO loo|
|00002820| 70 2e 65 00 00 00 00 62 | 00 ff ff 00 00 00 00 4e |p.e....b|.......N|
|00002830| 00 00 00 00 00 97 00 3d | 00 00 00 20 54 68 65 20 |.......=|... The |
|00002840| 65 78 65 63 75 74 69 6f | 6e 20 73 65 71 75 65 6e |executio|n sequen|
|00002850| 63 65 20 6f 66 20 74 68 | 65 20 6d 6f 64 75 6c 65 |ce of th|e module|
|00002860| 2d 6c 65 76 65 6c 20 63 | 6f 64 65 20 65 6e 64 73 |-level c|ode ends|
|00002870| 20 68 65 72 65 2e 00 00 | 00 97 00 3e 00 00 00 20 | here...|...>... |
|00002880| 54 68 65 20 70 72 6f 67 | 72 61 6d 20 6d 61 79 20 |The prog|ram may |
|00002890| 74 65 72 6d 69 6e 61 74 | 65 20 65 6c 73 65 77 68 |terminat|e elsewh|
|000028a0| 65 72 65 20 66 6f 72 20 | 6c 65 67 69 74 69 6d 61 |ere for |legitima|
|000028b0| 74 65 20 72 65 61 73 6f | 6e 73 2c 00 00 97 00 3a |te reaso|ns,....:|
|000028c0| 00 00 00 20 62 75 74 20 | 74 68 65 20 6e 6f 72 6d |... but |the norm|
|000028d0| 61 6c 20 65 78 65 63 75 | 74 69 6f 6e 20 73 65 71 |al execu|tion seq|
|000028e0| 75 65 6e 63 65 20 65 6e | 64 73 20 68 65 72 65 2e |uence en|ds here.|
|000028f0| 20 53 74 61 74 65 6d 65 | 6e 74 73 00 00 97 00 3c | Stateme|nts....<|
|00002900| 00 00 00 20 62 65 79 6f | 6e 64 20 74 68 65 20 45 |... beyo|nd the E|
|00002910| 4e 44 20 73 74 61 74 65 | 6d 65 6e 74 20 61 72 65 |ND state|ment are|
|00002920| 20 65 78 65 63 75 74 65 | 64 20 6f 6e 6c 79 20 69 | execute|d only i|
|00002930| 6e 20 72 65 73 70 6f 6e | 73 65 20 74 6f 00 00 97 |n respon|se to...|
|00002940| 00 14 00 00 00 20 6f 74 | 68 65 72 20 73 74 61 74 |..... ot|her stat|
|00002950| 65 6d 65 6e 74 73 2e 01 | 00 1b 00 00 00 97 00 34 |ements..|.......4|
|00002960| 00 00 00 20 54 68 69 73 | 20 66 69 72 73 74 20 6c |... This| first l|
|00002970| 61 62 65 6c 2c 20 4d 65 | 6d 6f 72 79 45 72 72 2c |abel, Me|moryErr,|
|00002980| 20 69 73 20 61 6e 20 65 | 72 72 6f 72 20 68 61 6e | is an e|rror han|
|00002990| 64 6c 65 72 2e 00 00 04 | 00 d0 21 65 04 00 10 6d |dler....|..!e...m|
|000029a0| 01 23 00 4e 6f 74 20 65 | 6e 6f 75 67 68 20 6d 65 |.#.Not e|nough me|
|000029b0| 6d 6f 72 79 2e 20 43 61 | 6e 27 74 20 72 65 61 64 |mory. Ca|n't read|
|000029c0| 20 66 69 6c 65 2e 22 96 | 00 00 10 4e 00 00 00 00 | file.".|...N....|
|000029d0| 00 97 00 46 00 00 00 20 | 44 61 74 61 20 73 74 61 |...F... |Data sta|
|000029e0| 74 65 6d 65 6e 74 73 20 | 66 6f 72 20 73 63 72 65 |tements |for scre|
|000029f0| 65 6e 20 6f 75 74 70 75 | 74 20 2d 20 69 6e 69 74 |en outpu|t - init|
|00002a00| 69 61 6c 69 7a 65 64 20 | 66 6f 72 20 32 35 20 72 |ialized |for 25 r|
|00002a10| 6f 77 73 2e 20 43 61 6e | 20 62 65 00 00 97 00 3e |ows. Can| be....>|
|00002a20| 00 00 00 20 6d 6f 64 69 | 66 69 65 64 20 66 6f 72 |... modi|fied for|
|00002a30| 20 34 33 2d 72 6f 77 20 | 6d 6f 64 65 20 69 66 20 | 43-row |mode if |
|00002a40| 79 6f 75 20 68 61 76 65 | 20 61 6e 20 45 47 41 20 |you have| an EGA |
|00002a50| 6f 72 20 56 47 41 20 61 | 64 61 70 74 65 72 2e 00 |or VGA a|dapter..|
|00002a60| 00 04 00 02 28 8b 04 00 | 00 a6 00 41 00 00 00 20 |....(...|...A... |
|00002a70| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |"       |        |
|00002a80| 20 20 20 da c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |   .....|........|
|00002a90| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002aa0| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 bf 22 00 62 00 |........|....".b.|
|00002ab0| 00 a6 00 41 00 00 00 20 | 22 20 20 20 20 20 20 20 |...A... |"       |
|00002ac0| 20 20 20 20 20 20 20 20 | 20 20 20 b3 20 20 20 20 |        |   .    |
|00002ad0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002af0| 20 20 20 b3 22 00 62 00 | 00 a6 00 41 00 00 00 20 |   .".b.|...A... |
|00002b00| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |"       |        |
|00002b10| da c4 c4 c1 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002b20| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002b30| c4 c4 c4 c4 c4 c4 c4 c4 | c2 cd cd b5 22 00 62 00 |........|....".b.|
|00002b40| 00 a6 00 41 00 00 00 20 | 22 20 20 20 20 20 20 20 |...A... |"       |
|00002b50| 20 20 20 20 20 20 20 20 | b3 20 20 20 20 20 20 20 |        |.       |
|00002b60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002b70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002b80| b3 20 20 b3 22 00 62 00 | 00 a6 00 41 00 00 00 20 |.  .".b.|...A... |
|00002b90| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 da c4 c4 |"       |     ...|
|00002ba0| c1 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002bb0| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002bc0| c4 c4 c4 c4 c4 c2 cd cd | b5 20 20 b3 22 00 62 00 |........|.  .".b.|
|00002bd0| 00 a6 00 41 00 00 00 20 | 22 20 20 20 20 20 20 20 |...A... |"       |
|00002be0| 20 20 20 20 20 b3 20 20 | 20 20 20 20 20 20 20 20 |     .  |        |
|00002bf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002c00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 b3 20 20 |        |     .  |
|00002c10| b3 20 20 b3 22 00 62 00 | 00 a6 00 41 00 00 00 20 |.  .".b.|...A... |
|00002c20| 22 20 20 20 20 20 20 20 | 20 20 da c4 c4 c1 c4 c4 |"       |  ......|
|00002c30| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002c40| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002c50| c4 c4 c2 cd cd b5 20 20 | b3 20 20 b3 22 00 62 00 |......  |.  .".b.|
|00002c60| 00 a6 00 41 00 00 00 20 | 22 20 20 20 20 20 20 20 |...A... |"       |
|00002c70| 20 20 b3 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |  .     |        |
|00002c80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002c90| 20 20 20 20 20 20 20 20 | 20 20 b3 20 20 b3 20 20 |        |  .  .  |
|00002ca0| b3 20 20 b3 22 00 62 00 | 00 a6 00 41 00 00 00 20 |.  .".b.|...A... |
|00002cb0| 22 20 20 20 20 20 20 da | c4 c4 c1 c4 c4 c4 c4 c4 |"      .|........|
|00002cc0| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002cd0| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c2 |........|........|
|00002ce0| cd cd b5 20 20 b3 20 20 | b3 20 20 b3 22 00 62 00 |...  .  |.  .".b.|
|00002cf0| 00 a6 00 41 00 00 00 20 | 22 20 20 20 20 20 20 b3 |...A... |"      .|
|00002d00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002d10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002d20| 20 20 20 20 20 20 20 b3 | 20 20 b3 20 20 b3 20 20 |       .|  .  .  |
|00002d30| b3 20 20 b3 22 00 62 00 | 00 a6 00 41 00 00 00 20 |.  .".b.|...A... |
|00002d40| 22 20 20 20 da c4 c4 c1 | c4 c4 c4 c4 c4 c4 c4 c4 |"   ....|........|
|00002d50| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002d60| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c2 cd cd b5 |........|........|
|00002d70| 20 20 b3 20 20 b3 20 20 | c3 c4 c4 d9 22 00 62 00 |  .  .  |....".b.|
|00002d80| 00 a6 00 3e 00 00 00 20 | 22 20 20 20 b3 20 20 20 |...>... |"   .   |
|00002d90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002da0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002db0| 20 20 20 20 b3 20 20 b3 | 20 20 b3 20 20 b3 20 20 |    .  .|  .  .  |
|00002dc0| b3 22 00 00 00 a6 00 3e | 00 00 00 20 22 da c4 c4 |.".....>|... "...|
|00002dd0| c1 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002de0| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00002df0| c4 c4 c4 c4 c4 c2 cd cd | b5 20 20 b3 20 20 b3 20 |........|.  .  . |
|00002e00| 20 c3 c4 c4 d9 22 00 00 | 00 a6 00 3b 00 00 00 20 | ...."..|...;... |
|00002e10| 22 b3 20 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |". _____|________|
|00002e20| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002e30| 5f 5f 5f 5f 5f 5f 5f 5f | 20 b3 20 20 b3 20 20 b3 |________| .  .  .|
|00002e40| 20 20 b3 20 20 b3 22 00 | d9 00 00 a6 00 3b 00 00 |  .  .".|.....;..|
|00002e50| 00 20 22 c6 cd cd cd cd | cd cd cd cd cd cd cd cd |. ".....|........|
|00002e60| cd cd cd cd cd cd cd cd | cd cd cd cd cd cd cd cd |........|........|
|00002e70| cd cd cd cd cd cd cd cd | cd cd cd b5 20 20 b3 20 |........|....  . |
|00002e80| 20 b3 20 20 c3 c4 c4 d9 | 22 00 d9 00 00 a6 00 38 | .  ....|"......8|
|00002e90| 00 00 00 20 22 b3 20 4e | 6f 74 65 3a 20 5f 5f 5f |... ". N|ote: ___|
|00002ea0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002eb0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 20 b3 20 20 |________|____ .  |
|00002ec0| b3 20 20 b3 20 20 b3 22 | 00 00 00 a6 00 38 00 00 |.  .  ."|.....8..|
|00002ed0| 00 20 22 b3 20 20 20 20 | 20 20 20 20 20 20 20 20 |. ".    |        |
|00002ee0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002ef0| 20 20 20 20 20 20 20 20 | 20 20 20 b3 20 20 b3 20 |        |   .  . |
|00002f00| 20 c3 c4 c4 d9 22 00 00 | 00 a6 00 35 00 00 00 20 | ...."..|...5... |
|00002f10| 22 b3 20 42 69 72 74 68 | 3a 20 5f 5f 2f 5f 5f 2f |". Birth|: __/__/|
|00002f20| 5f 5f 20 20 20 50 68 6f | 6e 65 3a 20 5f 5f 5f 2d |__   Pho|ne: ___-|
|00002f30| 5f 5f 5f 2d 5f 5f 5f 5f | 20 b3 20 20 b3 20 20 b3 |___-____| .  .  .|
|00002f40| 22 00 d9 00 00 a6 00 35 | 00 00 00 20 22 b3 20 20 |"......5|... ".  |
|00002f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002f60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002f70| 20 20 20 20 20 b3 20 20 | c3 c4 c4 d9 22 00 d9 00 |     .  |...."...|
|00002f80| 00 a6 00 32 00 00 00 20 | 22 b3 20 53 74 72 65 65 |...2... |". Stree|
|00002f90| 74 3a 20 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |t: _____|________|
|00002fa0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002fb0| 20 b3 20 20 b3 22 00 00 | 00 a6 00 32 00 00 00 20 | .  ."..|...2... |
|00002fc0| 22 b3 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |".      |        |
|00002fd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002fe0| 20 20 20 20 20 20 20 20 | 20 c3 c4 c4 d9 22 00 00 |        | ...."..|
|00002ff0| 00 a6 00 2f 00 00 00 20 | 22 b3 20 43 69 74 79 3a |.../... |". City:|
|00003000| 20 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 20 53 54 | _______|_____ ST|
|00003010| 3a 20 5f 5f 20 20 5a 69 | 70 3a 20 5f 5f 5f 5f 5f |: __  Zi|p: _____|
|00003020| 20 b3 22 00 d9 00 00 a6 | 00 2f 00 00 00 20 22 c0 | .".....|./... ".|
|00003030| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00003040| c4 c4 c4 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |........|........|
|00003050| c4 c4 c4 c4 c4 c4 c4 d9 | 22 00 d9 00 00 00 00 97 |........|".......|
|00003060| 00 2d 00 00 00 20 43 6f | 6c 6f 72 20 63 6f 64 65 |.-... Co|lor code|
|00003070| 73 20 61 6e 64 20 73 74 | 72 69 6e 67 73 20 66 6f |s and st|rings fo|
|00003080| 72 20 76 69 65 77 2d 6d | 6f 64 65 20 68 65 6c 70 |r view-m|ode help|
|00003090| 22 00 00 04 00 1a 29 99 | 04 00 00 a6 00 1b 00 00 |".....).|........|
|000030a0| 00 20 30 2c 20 20 22 53 | 65 6c 65 63 74 20 63 61 |. 0,  "S|elect ca|
|000030b0| 72 64 20 77 69 74 68 3a | 22 00 20 00 00 a6 00 11 |rd with:|". .....|
|000030c0| 00 00 00 20 31 2c 20 22 | 20 20 20 20 20 20 55 50 |... 1, "|      UP|
|000030d0| 22 00 72 00 00 a6 00 13 | 00 00 00 20 31 2c 20 22 |".r.....|... 1, "|
|000030e0| 20 20 20 20 20 20 44 4f | 57 4e 22 00 20 00 00 a6 |      DO|WN". ...|
|000030f0| 00 13 00 00 00 20 31 2c | 20 22 20 20 20 20 20 20 |..... 1,| "      |
|00003100| 50 47 55 50 22 00 20 00 | 00 a6 00 13 00 00 00 20 |PGUP". .|....... |
|00003110| 31 2c 20 22 20 20 20 20 | 20 20 50 47 44 4e 22 00 |1, "    |  PGDN".|
|00003120| 20 00 00 a6 00 13 00 00 | 00 20 31 2c 20 22 20 20 | .......|. 1, "  |
|00003130| 20 20 20 20 48 4f 4d 45 | 22 00 20 00 00 a6 00 12 |    HOME|". .....|
|00003140| 00 00 00 20 31 2c 20 22 | 20 20 20 20 20 20 45 4e |... 1, "|      EN|
|00003150| 44 22 00 00 00 a6 00 09 | 00 00 00 20 31 2c 20 22 |D"......|... 1, "|
|00003160| 22 00 20 00 00 a6 00 09 | 00 00 00 20 31 2c 20 22 |". .....|... 1, "|
|00003170| 22 00 20 00 00 00 00 97 | 00 2d 00 00 00 20 43 6f |". .....|.-... Co|
|00003180| 6c 6f 72 20 63 6f 64 65 | 73 20 61 6e 64 20 73 74 |lor code|s and st|
|00003190| 72 69 6e 67 73 20 66 6f | 72 20 65 64 69 74 2d 6d |rings fo|r edit-m|
|000031a0| 6f 64 65 20 68 65 6c 70 | 22 00 00 04 00 5c 2a a5 |ode help|"....\*.|
|000031b0| 04 00 00 a6 00 15 00 00 | 00 20 30 2c 20 20 22 4e |........|. 0,  "N|
|000031c0| 65 78 74 20 66 69 65 6c | 64 3a 22 00 67 00 00 a6 |ext fiel|d:".g...|
|000031d0| 00 12 00 00 00 20 31 2c | 20 22 20 20 20 20 20 20 |..... 1,| "      |
|000031e0| 54 41 42 22 00 00 00 a6 | 00 16 00 00 00 20 30 2c |TAB"....|..... 0,|
|000031f0| 20 20 22 41 63 63 65 70 | 74 20 63 61 72 64 3a 22 |  "Accep|t card:"|
|00003200| 00 00 00 a6 00 14 00 00 | 00 20 31 2c 20 22 20 20 |........|. 1, "  |
|00003210| 20 20 20 20 45 4e 54 45 | 52 22 00 00 00 a6 00 15 |    ENTE|R"......|
|00003220| 00 00 00 20 30 2c 20 20 | 22 45 64 69 74 20 66 69 |... 0,  |"Edit fi|
|00003230| 65 6c 64 3a 22 00 00 00 | 00 a6 00 1b 00 00 00 20 |eld:"...|....... |
|00003240| 31 2c 20 22 20 20 20 20 | 20 20 44 45 4c 20 20 20 |1, "    |  DEL   |
|00003250| 20 20 42 4b 53 50 22 00 | 20 00 00 a6 00 1b 00 00 |  BKSP".| .......|
|00003260| 00 20 31 2c 20 22 20 20 | 20 20 20 20 52 49 47 48 |. 1, "  |    RIGH|
|00003270| 54 20 20 20 4c 45 46 54 | 22 00 20 00 00 a6 00 1a |T   LEFT|". .....|
|00003280| 00 00 00 20 31 2c 20 22 | 20 20 20 20 20 20 48 4f |... 1, "|      HO|
|00003290| 4d 45 20 20 20 20 45 4e | 44 22 00 00 00 a6 00 1a |ME    EN|D"......|
|000032a0| 00 00 00 20 31 2c 20 22 | 20 20 20 20 20 20 49 4e |... 1, "|      IN|
|000032b0| 53 20 20 20 20 20 45 53 | 43 22 00 00 00 00 00 97 |S     ES|C"......|
|000032c0| 00 28 00 00 00 20 52 6f | 77 2c 20 63 6f 6c 75 6d |.(... Ro|w, colum|
|000032d0| 6e 2c 20 61 6e 64 20 6c | 65 6e 67 74 68 20 6f 66 |n, and l|ength of|
|000032e0| 20 65 61 63 68 20 66 69 | 65 6c 64 00 00 04 00 ff | each fi|eld.....|
|000032f0| ff b1 04 00 00 a6 00 23 | 00 00 00 20 31 34 2c 20 |.......#|... 14, |
|00003300| 36 2c 20 33 37 20 20 20 | 20 20 20 20 20 20 20 20 |6, 37   |        |
|00003310| 20 20 20 20 20 20 20 20 | 20 20 20 00 20 06 00 97 |        |   . ...|
|00003320| 00 08 00 26 00 20 4e 61 | 6d 65 73 00 00 a6 00 23 |...&. Na|mes....#|
|00003330| 00 00 00 20 31 36 2c 20 | 31 32 2c 20 33 31 20 20 |... 16, |12, 31  |
|00003340| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003350| 20 20 20 00 20 06 00 97 | 00 07 00 26 00 20 4e 6f |   . ...|...&. No|
|00003360| 74 65 73 00 00 a6 00 23 | 00 00 00 20 31 38 2c 20 |tes....#|... 18, |
|00003370| 31 33 2c 20 32 20 20 20 | 20 20 20 20 20 20 20 20 |13, 2   |        |
|00003380| 20 20 20 20 20 20 20 20 | 20 20 20 00 20 06 00 97 |        |   . ...|
|00003390| 00 08 00 26 00 20 4d 6f | 6e 74 68 00 00 a6 00 23 |...&. Mo|nth....#|
|000033a0| 00 00 00 20 31 38 2c 20 | 31 36 2c 20 32 20 20 20 |... 18, |16, 2   |
|000033b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000033c0| 20 20 20 00 20 06 00 97 | 00 06 00 26 00 20 44 61 |   . ...|...&. Da|
|000033d0| 79 00 00 a6 00 23 00 00 | 00 20 31 38 2c 20 31 39 |y....#..|. 18, 19|
|000033e0| 2c 20 32 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |, 2     |        |
|000033f0| 20 20 20 20 20 20 20 20 | 20 00 20 06 00 97 00 07 |        | . .....|
|00003400| 00 26 00 20 59 65 61 72 | 00 00 00 a6 00 23 00 00 |.&. Year|.....#..|
|00003410| 00 20 31 38 2c 20 33 31 | 2c 20 31 32 20 20 20 20 |. 18, 31|, 12    |
|00003420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003430| 20 00 20 06 00 97 00 08 | 00 26 00 20 50 68 6f 6e | . .....|.&. Phon|
|00003440| 65 00 00 a6 00 23 00 00 | 00 20 32 30 2c 20 31 34 |e....#..|. 20, 14|
|00003450| 2c 20 32 39 20 20 20 20 | 20 20 20 20 20 20 20 20 |, 29    |        |
|00003460| 20 20 20 20 20 20 20 20 | 20 00 20 06 00 97 00 09 |        | . .....|
|00003470| 00 26 00 20 53 74 72 65 | 65 74 00 00 00 a6 00 23 |.&. Stre|et.....#|
|00003480| 00 00 00 20 32 32 2c 20 | 31 32 2c 20 31 33 20 20 |... 22, |12, 13  |
|00003490| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000034a0| 20 20 20 00 20 06 00 97 | 00 07 00 26 00 20 43 69 |   . ...|...&. Ci|
|000034b0| 74 79 65 00 00 a6 00 23 | 00 00 00 20 32 32 2c 20 |tye....#|... 22, |
|000034c0| 32 39 2c 20 32 20 20 20 | 20 20 20 20 20 20 20 20 |29, 2   |        |
|000034d0| 20 20 20 20 20 20 20 20 | 20 20 20 00 20 06 00 97 |        |   . ...|
|000034e0| 00 08 00 26 00 20 53 74 | 61 74 65 00 00 a6 00 23 |...&. St|ate....#|
|000034f0| 00 00 00 20 32 32 2c 20 | 33 38 2c 20 35 20 20 20 |... 22, |38, 5   |
|00003500| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003510| 20 20 20 00 20 06 00 97 | 00 06 00 26 00 20 5a 69 |   . ...|...&. Zi|
|00003520| 70 00 00 a6 00 0b 00 00 | 00 20 30 2c 20 30 2c 20 |p.......|. 0, 0, |
|00003530| 30 00 35 00 00 09 00 08 | 00 06 21 68 02 fa 07 ff |0.5.....|..!h....|
|00003540| ff 48 01 00 00 00 00 02 | 01 00 05 00 41 6c 61 72 |.H......|....Alar|
|00003550| 6d 01 00 38 62 01 00 00 | 1b 00 ff ff c1 ff ff ff |m..8b...|........|
|00003560| 00 00 76 00 06 00 ec 02 | 00 01 00 00 00 00 97 00 |..v.....|........|
|00003570| 37 00 00 00 20 54 68 65 | 20 41 6c 61 72 6d 20 70 |7... The| Alarm p|
|00003580| 72 6f 63 65 64 75 72 65 | 20 75 73 65 73 20 74 68 |rocedure| uses th|
|00003590| 65 20 53 4f 55 4e 44 20 | 73 74 61 74 65 6d 65 6e |e SOUND |statemen|
|000035a0| 74 20 74 6f 20 73 65 6e | 64 00 00 00 97 00 37 00 |t to sen|d.....7.|
|000035b0| 00 00 20 73 69 67 6e 61 | 6c 73 20 74 6f 20 74 68 |.. signa|ls to th|
|000035c0| 65 20 63 6f 6d 70 75 74 | 65 72 27 73 20 73 70 65 |e comput|er's spe|
|000035d0| 61 6b 65 72 20 61 6e 64 | 20 73 6f 75 6e 64 20 61 |aker and| sound a|
|000035e0| 6e 20 61 6c 61 72 6d 00 | 00 00 97 00 02 00 00 00 |n alarm.|........|
|000035f0| 00 00 97 00 02 00 00 00 | 00 00 97 00 13 00 00 00 |........|........|
|00003600| 20 50 61 72 61 6d 65 74 | 65 72 73 3a 20 4e 6f 6e | Paramet|ers: Non|
|00003610| 65 6f 00 00 97 00 02 00 | 00 00 00 00 97 00 25 00 |eo......|......%.|
|00003620| 00 00 20 4f 75 74 70 75 | 74 3a 20 53 65 6e 64 73 |.. Outpu|t: Sends|
|00003630| 20 61 6e 20 61 6c 61 72 | 6d 20 74 6f 20 74 68 65 | an alar|m to the|
|00003640| 20 75 73 65 72 61 00 00 | 00 00 97 00 27 00 00 00 | usera..|....'...|
|00003650| 20 43 68 61 6e 67 65 20 | 74 68 65 20 6e 75 6d 62 | Change |the numb|
|00003660| 65 72 73 20 74 6f 20 76 | 61 72 79 20 74 68 65 20 |ers to v|ary the |
|00003670| 73 6f 75 6e 64 00 00 00 | 0b 00 c3 04 65 01 58 02 |sound...|....e.X.|
|00003680| 65 01 d0 07 65 01 28 00 | 57 00 ff ff ff ff 00 10 |e...e.(.|W.......|
|00003690| 0b 00 c3 04 0b 00 c3 04 | 65 01 58 1b 02 01 ec 00 |........|e.X.....|
|000036a0| 00 00 0b 00 c3 04 66 00 | ff ff ff ff 00 00 00 00 |......f.|........|
|000036b0| 00 00 51 00 09 00 08 00 | ff ff 04 00 ff ff ff ff |..Q.....|........|
|000036c0| 11 00 00 00 ff ff 02 0c | 00 0c 00 44 69 72 65 63 |........|...Direc|
|000036d0| 74 69 6f 6e 4b 65 79 01 | 00 38 d6 00 00 00 1b 00 |tionKey.|.8......|
|000036e0| ff ff c1 ff ff ff 00 00 | 76 00 18 00 f5 02 00 01 |........|v.......|
|000036f0| 03 00 05 03 00 02 05 00 | 0f 03 00 02 01 00 1a 03 |........|........|
|00003700| 00 02 01 00 00 20 0b 14 | 05 03 74 00 ff ff 00 30 |..... ..|..t....0|
|00003710| 0b 00 83 00 09 01 3b 00 | 00 40 0b 00 0f 03 64 05 |......;.|.@....d.|
|00003720| 77 01 0c 00 0f 03 00 30 | 0b 00 8b 00 09 01 3b 00 |w......0|......;.|
|00003730| 00 40 0b 00 0f 03 64 05 | 00 01 0c 00 0f 03 00 30 |.@....d.|.......0|
|00003740| 0b 00 b2 00 09 01 3b 00 | 00 40 0b 00 0f 03 0b 00 |......;.|.@......|
|00003750| bb 01 77 01 0c 00 0f 03 | 00 30 0b 00 ba 00 09 01 |..w.....|.0......|
|00003760| 3b 00 00 40 0b 00 0f 03 | 0b 00 bb 01 00 01 0c 00 |;..@....|........|
|00003770| 0f 03 00 30 0b 00 a2 00 | 09 01 3b 00 00 40 0b 00 |...0....|..;..@..|
|00003780| 1a 03 0c 00 0f 03 00 30 | 0b 00 aa 00 09 01 3b 00 |.......0|......;.|
|00003790| 00 40 64 05 0c 00 0f 03 | 00 30 3a 00 00 40 37 00 |.@d.....|.0:..@7.|
|000037a0| 00 00 ec 02 00 20 52 00 | 00 00 00 00 51 00 09 00 |..... R.|....Q...|
|000037b0| 08 00 ff ff 04 00 ff ff | ff ff 14 00 00 00 ff ff |........|........|
|000037c0| 02 0c 00 08 00 41 73 63 | 69 69 4b 65 79 01 00 38 |.....Asc|iiKey..8|
|000037d0| ea 07 00 00 1b 00 ff ff | c1 ff ff ff 00 00 97 00 |........|........|
|000037e0| 03 00 00 00 2a ff 00 00 | 97 00 3e 00 00 00 2a 20 |....*...|..>...* |
|000037f0| 41 73 63 69 69 4b 65 79 | 20 2d 20 48 61 6e 64 6c |AsciiKey| - Handl|
|00003800| 65 73 20 41 53 43 49 49 | 20 6b 65 79 73 2e 20 59 |es ASCII| keys. Y|
|00003810| 6f 75 20 63 61 6e 20 61 | 64 64 20 6e 65 77 20 63 |ou can a|dd new c|
|00003820| 6f 6d 6d 61 6e 64 73 20 | 62 79 00 00 97 00 42 00 |ommands |by....B.|
|00003830| 00 00 2a 20 61 73 73 69 | 67 6e 69 6e 67 20 6b 65 |..* assi|gning ke|
|00003840| 79 73 20 61 6e 64 20 61 | 63 74 69 6f 6e 73 20 68 |ys and a|ctions h|
|00003850| 65 72 65 20 61 6e 64 20 | 61 64 64 69 6e 67 20 74 |ere and |adding t|
|00003860| 68 65 6d 20 74 6f 20 74 | 68 65 20 63 6f 6d 6d 61 |hem to t|he comma|
|00003870| 6e 64 00 00 97 00 45 00 | 00 00 2a 20 6c 69 6e 65 |nd....E.|..* line|
|00003880| 20 64 69 73 70 6c 61 79 | 65 64 20 62 79 20 74 68 | display|ed by th|
|00003890| 65 20 53 68 6f 77 43 6d | 64 4c 69 6e 65 20 53 55 |e ShowCm|dLine SU|
|000038a0| 42 2e 20 46 6f 72 20 65 | 78 61 6d 70 6c 65 2c 20 |B. For e|xample, |
|000038b0| 79 6f 75 20 63 6f 75 6c | 64 20 61 64 64 65 00 00 |you coul|d adde..|
|000038c0| 97 00 45 00 00 00 2a 20 | 4c 20 28 66 6f 72 20 4c |..E...* |L (for L|
|000038d0| 6f 61 64 20 6e 65 77 20 | 66 69 6c 65 29 20 74 6f |oad new |file) to|
|000038e0| 20 70 72 6f 6d 70 74 20 | 74 68 65 20 75 73 65 72 | prompt |the user|
|000038f0| 20 66 6f 72 20 61 20 6e | 65 77 20 64 61 74 61 62 | for a n|ew datab|
|00003900| 61 73 65 20 66 69 6c 65 | 2e 65 00 00 97 00 03 00 |ase file|.e......|
|00003910| 00 00 2a 20 00 00 97 00 | 31 00 00 00 2a 20 50 61 |..* ....|1...* Pa|
|00003920| 72 61 6d 73 3a 20 55 73 | 65 72 43 68 6f 69 63 65 |rams: Us|erChoice|
|00003930| 24 20 2d 20 6b 65 79 20 | 70 72 65 73 73 65 64 20 |$ - key |pressed |
|00003940| 62 79 20 74 68 65 20 75 | 73 65 72 61 00 00 97 00 |by the u|sera....|
|00003950| 30 00 00 00 2a 0d 09 20 | 54 6f 70 43 61 72 64 20 |0...*.. |TopCard |
|00003960| 2d 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |- the nu|mber of |
|00003970| 74 68 65 20 63 75 72 72 | 65 6e 74 20 72 65 63 6f |the curr|ent reco|
|00003980| 72 64 00 00 97 00 26 00 | 00 00 2a 0d 09 20 4c 61 |rd....&.|..*.. La|
|00003990| 73 74 43 61 72 64 20 2d | 20 74 68 65 20 6e 75 6d |stCard -| the num|
|000039a0| 62 65 72 20 6f 66 20 72 | 65 63 6f 72 64 73 00 00 |ber of r|ecords..|
|000039b0| 97 00 03 00 00 00 2a 0d | 00 00 76 00 18 00 26 03 |......*.|..v...&.|
|000039c0| 00 01 03 00 cb 04 00 02 | 05 00 0f 03 00 02 01 00 |........|........|
|000039d0| 1a 03 00 02 01 00 00 00 | 7d 01 ff ff 15 00 83 02 |........|}.......|
|000039e0| 0d 00 0d 00 bf 03 00 00 | 00 10 0b 14 cb 04 2a 01 |........|......*.|
|000039f0| 74 00 ff ff 00 20 97 00 | 19 00 08 00 20 45 64 69 |t.... ..|.... Edi|
|00003a00| 74 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 63 61 |t the cu|rrent ca|
|00003a10| 72 64 2e 00 00 20 6d 01 | 01 00 65 22 3b 00 00 30 |rd... m.|..e";..0|
|00003a20| 37 00 00 00 cb 03 00 30 | 6d 01 0f 00 45 64 69 74 |7......0|m...Edit|
|00003a30| 69 6e 67 20 43 61 72 64 | 2e 2e 2e 22 0b 00 cd 01 |ing Card|..."....|
|00003a40| 64 05 64 01 0e 14 04 00 | 34 04 0c 14 d9 04 00 30 |d.d.....|4......0|
|00003a50| 0b 00 0f 03 0e 00 01 00 | 72 04 37 00 01 00 57 03 |........|r.7...W.|
|00003a60| 00 30 64 05 8a 00 0b 00 | 0f 03 0e 00 01 00 72 04 |.0d.....|......r.|
|00003a70| 11 00 8d 02 0b 00 0f 03 | 0e 00 01 00 72 04 df 00 |........|....r...|
|00003a80| ff ff 00 30 72 01 72 01 | 73 01 0b 00 f5 01 c1 00 |...0r.r.|s.......|
|00003a90| 04 00 00 30 37 00 00 00 | a0 03 00 00 00 20 97 00 |...07...|..... ..|
|00003aa0| 2a 00 08 00 20 41 64 64 | 20 61 6e 64 20 65 64 69 |*... Add| and edi|
|00003ab0| 74 20 61 20 62 6c 61 6e | 6b 20 6f 72 20 64 75 70 |t a blan|k or dup|
|00003ac0| 6c 69 63 61 74 65 20 63 | 61 72 64 2e 00 20 6d 01 |licate c|ard.. m.|
|00003ad0| 01 00 61 22 3b 00 6d 01 | 01 00 63 22 3b 00 00 30 |..a";.m.|..c";..0|
|00003ae0| 0b 14 cb 04 6d 01 01 00 | 63 22 03 01 61 00 00 00 |....m...|c"..a...|
|00003af0| 00 40 0b 00 0f 03 0e 00 | 01 00 72 04 0c 00 bf 03 |.@......|..r.....|
|00003b00| 97 00 18 00 2c 00 20 44 | 75 70 6c 69 63 61 74 65 |....,. D|uplicate|
|00003b10| 20 6f 66 20 74 6f 70 20 | 63 61 72 64 00 30 49 00 | of top |card.0I.|
|00003b20| ff ff 00 40 64 01 0b 00 | bf 03 12 00 8d 02 97 00 |...@d...|........|
|00003b30| 17 00 2c 00 20 49 6e 69 | 74 69 61 6c 69 7a 65 20 |..,. Ini|tialize |
|00003b40| 6e 65 77 20 63 61 72 64 | 2e 20 00 40 6d 01 00 00 |new card|. .@m...|
|00003b50| 0b 00 bf 03 12 00 98 02 | 00 40 6d 01 00 00 0b 00 |........|.@m.....|
|00003b60| bf 03 12 00 a1 02 00 40 | 64 01 0b 00 bf 03 12 00 |.......@|d.......|
|00003b70| a9 02 00 40 64 01 0b 00 | bf 03 12 00 b2 02 00 40 |...@d...|.......@|
|00003b80| 64 01 0b 00 bf 03 12 00 | b9 02 00 40 6d 01 00 00 |d.......|...@m...|
|00003b90| 0b 00 bf 03 12 00 c1 02 | 00 40 6d 01 00 00 0b 00 |........|.@m.....|
|00003ba0| bf 03 12 00 ca 02 00 40 | 6d 01 00 00 0b 00 bf 03 |.......@|m.......|
|00003bb0| 12 00 d4 02 00 40 6d 01 | 00 00 0b 00 bf 03 12 00 |.....@m.|........|
|00003bc0| dc 02 00 40 6d 01 00 00 | 0b 00 bf 03 12 00 e5 02 |...@m...|........|
|00003bd0| 00 30 50 00 00 30 0b 00 | 1a 03 64 05 00 01 0c 00 |.0P..0..|..d.....|
|00003be0| 0f 03 00 30 0b 00 0f 03 | 0c 00 1a 03 00 30 0b 00 |...0....|.....0..|
|00003bf0| bf 03 0b 00 0f 03 0f 00 | 01 00 72 04 00 30 0b 00 |........|..r..0..|
|00003c00| 0f 03 0b 00 0f 03 0e 00 | 01 00 72 04 12 00 8d 02 |........|..r.....|
|00003c10| 00 30 0b 00 0f 03 0b 00 | 1a 03 37 00 02 00 ea 03 |.0......|..7.....|
|00003c20| 00 30 37 00 00 00 cb 03 | 00 30 6d 01 0f 00 45 64 |.07.....|.0m...Ed|
|00003c30| 69 74 69 6e 67 20 43 61 | 72 64 2e 2e 2e 22 0b 00 |iting Ca|rd..."..|
|00003c40| cd 01 64 05 64 01 0e 14 | 04 00 34 04 0c 14 d9 04 |..d.d...|..4.....|
|00003c50| 00 30 0b 00 0f 03 0e 00 | 01 00 72 04 37 00 01 00 |.0......|..r.7...|
|00003c60| 57 03 00 30 64 05 8a 00 | 0b 00 0f 03 0e 00 01 00 |W..0d...|........|
|00003c70| 72 04 11 00 8d 02 0b 00 | 0f 03 0e 00 01 00 72 04 |r.......|......r.|
|00003c80| df 00 ff ff 00 30 72 01 | 72 01 73 01 0b 00 f5 01 |.....0r.|r.s.....|
|00003c90| c1 00 04 00 00 30 37 00 | 00 00 a0 03 00 00 00 20 |.....07.|....... |
|00003ca0| 97 00 31 00 08 00 20 4d | 6f 76 65 20 64 65 6c 65 |..1... M|ove dele|
|00003cb0| 74 65 64 20 63 61 72 64 | 20 74 6f 20 65 6e 64 20 |ted card| to end |
|00003cc0| 61 6e 64 20 61 64 6a 75 | 73 74 20 6c 61 73 74 20 |and adju|st last |
|00003cd0| 63 61 72 64 2e 64 00 20 | 6d 01 01 00 64 22 3b 00 |card.d. |m...d";.|
|00003ce0| 00 30 0b 00 63 03 0b 00 | 0f 03 0b 00 1a 03 64 05 |.0..c...|......d.|
|00003cf0| 77 01 56 00 ff ff ff ff | 00 40 0b 00 63 03 64 05 |w.V.....|.@..c.d.|
|00003d00| 00 01 0e 00 01 00 72 04 | 0b 00 63 03 0e 00 01 00 |......r.|..c.....|
|00003d10| 72 04 ed 00 ff ff 00 30 | 0b 00 63 03 66 00 ff ff |r......0|..c.f...|
|00003d20| ff ff 00 30 0b 00 1a 03 | 64 05 77 01 0c 00 1a 03 |...0....|d.w.....|
|00003d30| 00 00 00 20 97 00 19 00 | 08 00 20 46 69 6e 64 20 |... ....|.. Find |
|00003d40| 61 20 73 70 65 63 69 66 | 69 65 64 20 63 61 72 64 |a specif|ied card|
|00003d50| 2e 00 00 20 6d 01 01 00 | 66 22 3b 00 00 30 37 00 |... m...|f";..07.|
|00003d60| 00 00 cb 03 00 30 6d 01 | 32 00 45 6e 74 65 72 20 |.....0m.|2.Enter |
|00003d70| 66 69 65 6c 64 73 20 66 | 6f 72 20 73 65 61 72 63 |fields f|or searc|
|00003d80| 68 20 28 62 6c 61 6e 6b | 20 66 69 65 6c 64 73 20 |h (blank| fields |
|00003d90| 61 72 65 20 69 67 6e 6f | 72 65 64 29 0c 14 d9 04 |are igno|red)....|
|00003da0| 00 30 0b 14 d9 04 0b 00 | cd 01 64 05 64 01 0e 14 |.0......|..d.d...|
|00003db0| 04 00 34 04 0c 14 d9 04 | 00 30 0b 00 0f 03 0b 00 |..4.....|.0......|
|00003dc0| 1a 03 0e 00 02 00 28 04 | 0c 00 63 03 00 30 0b 00 |......(.|..c..0..|
|00003dd0| 63 03 61 00 00 00 00 40 | 0b 00 63 03 0c 00 0f 03 |c.a....@|..c.....|
|00003de0| 00 30 49 00 ff ff 00 40 | 9a 00 00 40 37 00 00 00 |.0I....@|...@7...|
|00003df0| 3d 03 00 40 6d 01 21 00 | 43 61 6e 27 74 20 66 69 |=..@m.!.|Can't fi|
|00003e00| 6e 64 20 63 61 72 64 2e | 20 50 72 65 73 73 20 61 |nd card.| Press a|
|00003e10| 6e 79 20 6b 65 79 2e 2e | 2e 22 0c 14 d9 04 00 40 |ny key..|.".....@|
|00003e20| 0b 14 d9 04 0b 00 cd 01 | 64 05 64 05 0e 14 04 00 |........|d.d.....|
|00003e30| 34 04 0c 14 d9 04 00 30 | 50 00 00 30 72 01 72 01 |4......0|P..0r.r.|
|00003e40| 73 01 0b 00 f5 01 c1 00 | 04 00 00 30 37 00 00 00 |s.......|...07...|
|00003e50| a0 03 00 00 00 20 97 00 | 24 00 08 00 20 53 6f 72 |..... ..|$... Sor|
|00003e60| 74 73 20 63 61 72 64 73 | 20 62 79 20 61 20 73 70 |ts cards| by a sp|
|00003e70| 65 63 69 66 69 65 64 20 | 66 69 65 6c 64 2e 00 20 |ecified |field.. |
|00003e80| 6d 01 01 00 73 22 3b 00 | 00 30 37 00 00 00 3d 03 |m...s";.|.07...=.|
|00003e90| 00 30 6d 01 2b 00 54 41 | 42 20 74 6f 20 64 65 73 |.0m.+.TA|B to des|
|00003ea0| 69 72 65 64 20 73 6f 72 | 74 20 66 69 65 6c 64 2c |ired sor|t field,|
|00003eb0| 20 74 68 65 6e 20 70 72 | 65 73 73 20 45 4e 54 45 | then pr|ess ENTE|
|00003ec0| 52 22 0c 14 d9 04 00 30 | 0b 14 d9 04 0b 00 cd 01 |R".....0|........|
|00003ed0| 64 05 64 01 0e 14 04 00 | 34 04 0c 14 d9 04 00 30 |d.d.....|4......0|
|00003ee0| 0b 00 56 04 0b 00 1a 03 | 37 00 02 00 86 03 00 30 |..V.....|7......0|
|00003ef0| 64 05 0c 00 0f 03 00 30 | 37 00 00 00 a0 03 00 00 |d......0|7.......|
|00003f00| 00 20 97 00 29 00 08 00 | 20 50 72 69 6e 74 73 20 |. ..)...| Prints |
|00003f10| 61 64 64 72 65 73 73 20 | 6f 66 20 74 6f 70 20 63 |address |of top c|
|00003f20| 61 72 64 20 6f 6e 20 70 | 72 69 6e 74 65 72 2e 45 |ard on p|rinter.E|
|00003f30| 00 20 6d 01 01 00 70 22 | 3b 00 00 30 0b 00 0f 03 |. m...p"|;..0....|
|00003f40| 0e 00 01 00 72 04 37 00 | 01 00 78 03 00 00 00 20 |....r.7.|..x.... |
|00003f50| 97 00 1a 00 08 00 20 54 | 65 72 6d 69 6e 61 74 65 |...... T|erminate|
|00003f60| 73 20 74 68 65 20 70 72 | 6f 67 72 61 6d 2e 00 20 |s the pr|ogram.. |
|00003f70| 6d 01 01 00 71 22 3b 00 | 0b 00 69 00 09 01 3b 00 |m...q";.|..i...;.|
|00003f80| 00 30 0b 00 1a 03 37 00 | 01 00 32 03 00 30 72 01 |.0....7.|..2..0r.|
|00003f90| 72 01 73 01 0b 00 e9 01 | c1 00 04 00 00 30 73 01 |r.s.....|.....0s.|
|00003fa0| a3 00 00 30 4e 00 00 20 | 3a 00 00 30 9a 00 00 10 |...0N.. |:..0....|
|00003fb0| 52 00 00 00 00 00 51 00 | 09 00 08 00 ff ff 04 00 |R.....Q.|........|
|00003fc0| ff ff ff ff 65 00 00 00 | ff ff 02 0c 00 07 00 43 |....e...|.......C|
|00003fd0| 6c 65 61 6e 55 70 01 00 | 38 b8 02 00 00 1b 00 ff |leanUp..|8.......|
|00003fe0| ff c1 ff ff ff 00 00 97 | 00 03 00 00 00 2a 00 00 |........|.....*..|
|00003ff0| 00 97 00 3f 00 00 00 2a | 20 43 6c 65 61 6e 55 70 |...?...*| CleanUp|
|00004000| 20 2d 20 57 72 69 74 65 | 73 20 61 6c 6c 20 72 65 | - Write|s all re|
|00004010| 63 6f 72 64 73 20 66 72 | 6f 6d 20 6d 65 6d 6f 72 |cords fr|om memor|
|00004020| 79 20 74 6f 20 61 20 66 | 69 6c 65 2e 20 44 65 6c |y to a f|ile. Del|
|00004030| 65 74 65 64 72 00 00 97 | 00 47 00 00 00 2a 20 72 |etedr...|.G...* r|
|00004040| 65 63 6f 72 64 73 20 28 | 70 61 73 74 20 74 68 65 |ecords (|past the|
|00004050| 20 6c 61 73 74 20 63 61 | 72 64 29 20 77 69 6c 6c | last ca|rd) will|
|00004060| 20 6e 6f 74 20 62 65 20 | 77 72 69 74 74 65 6e 2e | not be |written.|
|00004070| 20 54 68 65 20 76 61 6c | 69 64 20 72 65 63 6f 72 | The val|id recor|
|00004080| 64 73 20 00 00 97 00 45 | 00 00 00 2a 20 61 72 65 |ds ....E|...* are|
|00004090| 20 77 72 69 74 74 65 6e | 20 74 6f 20 61 20 74 65 | written| to a te|
|000040a0| 6d 70 6f 72 61 72 79 20 | 66 69 6c 65 2e 20 54 68 |mporary |file. Th|
|000040b0| 65 20 6f 6c 64 20 66 69 | 6c 65 20 69 73 20 64 65 |e old fi|le is de|
|000040c0| 6c 65 74 65 64 2c 20 61 | 6e 64 20 74 68 65 64 00 |leted, a|nd thed.|
|000040d0| 00 97 00 23 00 00 00 2a | 20 6e 65 77 20 66 69 6c |...#...*| new fil|
|000040e0| 65 20 69 73 20 67 69 76 | 65 6e 20 74 68 65 20 6f |e is giv|en the o|
|000040f0| 6c 64 20 6e 61 6d 65 2e | 2e 00 00 97 00 03 00 00 |ld name.|........|
|00004100| 00 2a 20 00 00 97 00 32 | 00 00 00 2a 20 50 61 72 |.* ....2|...* Par|
|00004110| 61 6d 73 3a 20 4c 61 73 | 74 43 61 72 64 20 2d 20 |ams: Las|tCard - |
|00004120| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 76 61 |the numb|er of va|
|00004130| 6c 69 64 20 72 65 63 6f | 72 64 73 00 00 97 00 03 |lid reco|rds.....|
|00004140| 00 00 00 2a 20 00 00 97 | 00 37 00 00 00 2a 20 4f |...* ...|.7...* O|
|00004150| 75 74 70 75 74 3a 20 56 | 61 6c 69 64 20 72 65 63 |utput: V|alid rec|
|00004160| 6f 72 64 73 20 74 6f 20 | 44 49 53 4b 46 49 4c 45 |ords to |DISKFILE|
|00004170| 24 20 74 68 72 6f 75 67 | 68 20 54 4d 50 46 49 4c |$ throug|h TMPFIL|
|00004180| 45 24 6c 00 00 97 00 03 | 00 00 00 2a 20 00 00 76 |E$l.....|...* ..v|
|00004190| 00 0c 00 32 03 00 01 01 | 00 1a 03 00 00 01 00 00 |...2....|........|
|000041a0| 00 00 10 97 00 3f 00 04 | 00 20 57 72 69 74 65 20 |.....?..|. Write |
|000041b0| 72 65 63 6f 72 64 73 20 | 74 6f 20 74 65 6d 70 6f |records |to tempo|
|000041c0| 72 61 72 79 20 66 69 6c | 65 20 69 6e 20 74 68 65 |rary fil|e in the|
|000041d0| 69 72 20 63 75 72 72 65 | 6e 74 20 73 6f 72 74 20 |ir curre|nt sort |
|000041e0| 6f 72 64 65 72 2e 6e 00 | 10 0b 14 02 02 64 09 8a |order.n.|.....d..|
|000041f0| 00 64 05 0e 00 01 00 72 | 04 2d 01 ff ff ca 00 04 |.d.....r|.-......|
|00004200| 00 00 10 0b 00 63 03 64 | 05 0b 00 1a 03 56 00 ff |.....c.d|.....V..|
|00004210| ff ff ff 00 20 64 09 8a | 00 0b 00 63 03 0b 00 63 |.... d..|...c...c|
|00004220| 03 0e 00 01 00 72 04 df | 00 ff ff 00 10 65 00 ff |.....r..|.....e..|
|00004230| ff ff ff 00 00 00 10 97 | 00 33 00 04 00 20 44 65 |........|.3... De|
|00004240| 6c 65 74 65 20 6f 6c 64 | 20 66 69 6c 65 20 61 6e |lete old| file an|
|00004250| 64 20 72 65 70 6c 61 63 | 65 20 69 74 20 77 69 74 |d replac|e it wit|
|00004260| 68 20 6e 65 77 20 76 65 | 72 73 69 6f 6e 2e 20 00 |h new ve|rsion. .|
|00004270| 10 a2 00 00 00 00 10 0b | 14 0d 02 ba 00 00 10 0b |........|........|
|00004280| 14 02 02 0b 14 0d 02 c8 | 00 00 00 00 00 51 00 09 |........|.....Q..|
|00004290| 00 08 00 ff ff 04 00 ff | ff ff ff 19 00 00 00 ff |........|........|
|000042a0| ff 02 0c 00 09 00 43 6c | 65 61 72 48 65 6c 70 01 |......Cl|earHelp.|
|000042b0| 00 38 66 01 00 00 1b 00 | ff ff c1 ff ff ff 00 00 |.8f.....|........|
|000042c0| 97 00 03 00 00 00 2a 02 | 00 00 97 00 3d 00 00 00 |......*.|....=...|
|000042d0| 2a 20 43 6c 65 61 72 48 | 65 6c 70 20 2d 20 57 72 |* ClearH|elp - Wr|
|000042e0| 69 74 65 73 20 73 70 61 | 63 65 73 20 74 6f 20 74 |ites spa|ces to t|
|000042f0| 68 65 20 68 65 6c 70 20 | 61 72 65 61 20 6f 66 20 |he help |area of |
|00004300| 74 68 65 20 73 63 72 65 | 65 6e 2e 72 00 00 97 00 |the scre|en.r....|
|00004310| 03 00 00 00 2a 20 00 00 | 97 00 10 00 00 00 2a 20 |....* ..|......* |
|00004320| 50 61 72 61 6d 73 3a 20 | 4e 6f 6e 65 00 00 97 00 |Params: |None....|
|00004330| 03 00 00 00 2a 20 00 00 | 97 00 20 00 00 00 2a 20 |....* ..|.. ...* |
|00004340| 4f 75 74 70 75 74 3a 20 | 42 6c 61 6e 6b 73 20 74 |Output: |Blanks t|
|00004350| 6f 20 74 68 65 20 73 63 | 72 65 65 6e 00 00 97 00 |o the sc|reen....|
|00004360| 03 00 00 00 2a 20 00 00 | 76 00 06 00 3d 03 00 01 |....* ..|v...=...|
|00004370| 00 00 00 00 00 10 97 00 | 11 00 04 00 20 43 6c 65 |........|.... Cle|
|00004380| 61 72 20 6b 65 79 20 68 | 65 6c 70 73 00 10 73 01 |ar key h|elps..s.|
|00004390| 0b 00 64 01 73 01 0b 00 | 56 01 a4 00 04 00 00 10 |..d.s...|V.......|
|000043a0| 0b 00 45 04 0b 00 8e 01 | 0b 00 99 01 56 00 ff ff |..E.....|....V...|
|000043b0| ff ff 00 20 73 01 0b 00 | 45 04 73 01 0b 00 a4 01 |... s...|E.s.....|
|000043c0| c1 00 04 00 00 20 0b 00 | b0 01 4e 01 96 00 00 10 |..... ..|..N.....|
|000043d0| 65 00 ff ff ff ff 00 00 | 00 10 97 00 15 00 04 00 |e.......|........|
|000043e0| 20 43 6c 65 61 72 20 63 | 6f 6d 6d 61 6e 64 20 6c | Clear c|ommand l|
|000043f0| 69 6e 65 20 00 10 73 01 | 0b 00 cd 01 73 01 64 05 |ine ..s.|....s.d.|
|00004400| c1 00 04 00 00 10 65 01 | 50 00 4e 01 95 00 93 00 |......e.|P.N.....|
|00004410| 00 00 00 00 51 00 09 00 | 08 00 ff ff 04 00 ff ff |....Q...|........|
|00004420| ff ff 16 00 00 00 ff ff | 02 0c 00 09 00 44 72 61 |........|.....Dra|
|00004430| 77 43 61 72 64 73 01 00 | 38 50 02 00 00 1b 00 ff |wCards..|8P......|
|00004440| ff c1 ff ff ff 00 00 97 | 00 03 00 00 00 2a 00 00 |........|.....*..|
|00004450| 00 97 00 4a 00 00 00 2a | 20 44 72 61 77 43 61 72 |...J...*| DrawCar|
|00004460| 64 73 20 2d 20 49 6e 69 | 74 69 61 6c 69 7a 65 73 |ds - Ini|tializes|
|00004470| 20 73 63 72 65 65 6e 20 | 62 79 20 73 65 74 74 69 | screen |by setti|
|00004480| 6e 67 20 74 68 65 20 63 | 6f 6c 6f 72 2c 20 73 65 |ng the c|olor, se|
|00004490| 74 74 69 6e 67 20 74 68 | 65 20 77 69 64 74 68 00 |tting th|e width.|
|000044a0| 00 97 00 4c 00 00 00 2a | 20 61 6e 64 20 68 65 69 |...L...*| and hei|
|000044b0| 67 68 74 2c 20 63 6c 65 | 61 72 69 6e 67 20 74 68 |ght, cle|aring th|
|000044c0| 65 20 73 63 72 65 65 6e | 2c 20 61 6e 64 20 68 69 |e screen|, and hi|
|000044d0| 64 69 6e 67 20 74 68 65 | 20 63 75 72 73 6f 72 2e |ding the| cursor.|
|000044e0| 20 54 68 65 6e 20 77 72 | 69 74 65 73 20 63 61 72 | Then wr|ites car|
|000044f0| 64 00 00 97 00 2a 00 00 | 00 2a 20 74 65 78 74 20 |d....*..|.* text |
|00004500| 61 6e 64 20 76 69 65 77 | 2d 6d 6f 64 65 20 68 65 |and view|-mode he|
|00004510| 6c 70 20 74 6f 20 74 68 | 65 20 73 63 72 65 65 6e |lp to th|e screen|
|00004520| 2e 00 00 97 00 03 00 00 | 00 2a 20 00 00 97 00 10 |........|.* .....|
|00004530| 00 00 00 2a 20 50 61 72 | 61 6d 73 3a 20 4e 6f 6e |...* Par|ams: Non|
|00004540| 65 00 00 97 00 03 00 00 | 00 2a 20 00 00 97 00 1e |e.......|.* .....|
|00004550| 00 00 00 2a 20 4f 75 74 | 70 75 74 3a 20 54 65 78 |...* Out|put: Tex|
|00004560| 74 20 74 6f 20 74 68 65 | 20 73 63 72 65 65 6e 00 |t to the| screen.|
|00004570| 00 97 00 03 00 00 00 2a | 20 00 00 76 00 06 00 4a |.......*| ..v...J|
|00004580| 03 00 01 00 00 00 00 00 | 10 97 00 21 00 04 00 20 |........|...!... |
|00004590| 43 6c 65 61 72 20 73 63 | 72 65 65 6e 20 74 6f 20 |Clear sc|reen to |
|000045a0| 63 75 72 72 65 6e 74 20 | 63 6f 6c 6f 72 2e 65 00 |current |color.e.|
|000045b0| 10 65 01 50 00 0b 00 cd | 01 f8 00 00 10 73 01 0b |.e.P....|.....s..|
|000045c0| 00 64 01 73 01 0b 00 56 | 01 a4 00 04 00 00 10 73 |.d.s...V|.......s|
|000045d0| 01 a3 00 00 10 72 01 72 | 01 73 01 0b 00 f5 01 73 |.....r.r|.s.....s|
|000045e0| 01 64 01 73 01 64 1d c1 | 00 08 00 00 00 00 10 97 |.d.s.d..|........|
|000045f0| 00 2b 00 04 00 20 44 69 | 73 70 6c 61 79 20 6c 69 |.+... Di|splay li|
|00004600| 6e 65 20 63 68 61 72 61 | 63 74 65 72 73 20 74 68 |ne chara|cters th|
|00004610| 61 74 20 66 6f 72 6d 20 | 63 61 72 64 73 2e 00 00 |at form |cards...|
|00004620| 10 6b 00 8b 04 00 10 0b | 00 45 04 64 05 65 01 17 |.k......|.E.d.e..|
|00004630| 00 56 00 ff ff ff ff 00 | 20 73 01 0b 00 45 04 73 |.V......| s...E.s|
|00004640| 01 64 11 c1 00 04 00 00 | 20 0b 14 d9 04 e2 00 00 |.d......| .......|
|00004650| 20 0b 14 d9 04 95 00 93 | 00 00 10 65 00 ff ff ff | .......|...e....|
|00004660| ff 00 00 00 10 97 00 10 | 00 04 00 20 44 69 73 70 |........|... Disp|
|00004670| 6c 61 79 20 68 65 6c 70 | 2e 00 10 37 00 00 00 a0 |lay help|...7....|
|00004680| 03 00 00 00 00 51 00 09 | 00 08 00 ff ff 04 00 ff |.....Q..|........|
|00004690| ff ff ff 1e 00 00 00 ff | ff 02 0c 00 08 00 45 64 |........|......Ed|
|000046a0| 69 74 43 61 72 64 01 00 | 38 1a 07 00 00 1b 00 ff |itCard..|8.......|
|000046b0| ff c1 ff ff ff 00 00 97 | 00 03 00 00 00 2a 00 00 |........|.....*..|
|000046c0| 00 97 00 36 00 00 00 2a | 20 45 64 69 74 43 61 72 |...6...*| EditCar|
|000046d0| 64 20 2d 20 45 64 69 74 | 73 20 65 61 63 68 20 66 |d - Edit|s each f|
|000046e0| 69 65 6c 64 20 6f 66 20 | 61 20 73 70 65 63 69 66 |ield of |a specif|
|000046f0| 69 65 64 20 72 65 63 6f | 72 64 2e 00 00 97 00 03 |ied reco|rd......|
|00004700| 00 00 00 2a 20 00 00 97 | 00 2a 00 00 00 2a 20 50 |...* ...|.*...* P|
|00004710| 61 72 61 6d 73 3a 20 43 | 61 72 64 20 2d 20 74 68 |arams: C|ard - th|
|00004720| 65 20 72 65 63 6f 72 64 | 20 74 6f 20 62 65 20 65 |e record| to be e|
|00004730| 64 69 74 65 64 00 00 97 | 00 03 00 00 00 2a 20 00 |dited...|.....* .|
|00004740| 00 97 00 44 00 00 00 2a | 20 52 65 74 75 72 6e 3a |...D...*| Return:|
|00004750| 20 53 69 6e 63 65 20 43 | 61 72 64 20 69 73 20 70 | Since C|ard is p|
|00004760| 61 73 73 65 64 20 62 79 | 20 72 65 66 65 72 65 6e |assed by| referen|
|00004770| 63 65 2c 20 74 68 65 20 | 65 64 69 74 65 64 20 76 |ce, the |edited v|
|00004780| 65 72 73 69 6f 6e 20 69 | 73 00 00 97 00 1b 00 00 |ersion i|s.......|
|00004790| 00 2a 0d 09 20 65 66 66 | 65 63 74 69 76 65 6c 79 |.*.. eff|ectively|
|000047a0| 20 72 65 74 75 72 6e 65 | 64 2e 61 00 00 97 00 03 | returne|d.a.....|
|000047b0| 00 00 00 2a 0d 00 00 76 | 00 0c 00 57 03 00 01 01 |...*...v|...W....|
|000047c0| 00 63 03 00 20 83 02 00 | 00 00 10 97 00 30 00 04 |.c.. ...|.....0..|
|000047d0| 00 20 53 65 74 20 4e 65 | 78 74 46 6c 61 67 20 61 |. Set Ne|xtFlag a|
|000047e0| 6e 64 20 63 6f 6e 74 69 | 6e 75 65 20 65 64 69 74 |nd conti|nue edit|
|000047f0| 69 6e 67 20 65 61 63 68 | 20 66 69 65 6c 64 2e 00 |ing each| field..|
|00004800| 10 97 00 33 00 04 00 20 | 4e 65 78 74 46 6c 61 67 |...3... |NextFlag|
|00004810| 20 69 73 20 63 6c 65 61 | 72 65 64 20 77 68 65 6e | is clea|red when|
|00004820| 20 74 68 65 20 75 73 65 | 72 20 70 72 65 73 73 65 | the use|r presse|
|00004830| 73 20 45 4e 54 45 52 2e | 65 00 00 00 10 0b 00 e1 |s ENTER.|e.......|
|00004840| 01 0c 00 a2 05 00 10 46 | 00 00 00 00 20 6b 00 b1 |.......F|.... k..|
|00004850| 04 00 00 00 20 97 00 1a | 00 08 00 20 53 74 61 72 |.... ...|... Star|
|00004860| 74 20 77 69 74 68 20 66 | 69 72 73 74 20 66 69 65 |t with f|irst fie|
|00004870| 6c 64 2e 00 20 0b 00 45 | 04 e2 00 0b 00 4c 04 e2 |ld.. ..E|.....L..|
|00004880| 00 0b 00 11 04 e2 00 00 | 20 73 01 0b 00 45 04 73 |........| s...E.s|
|00004890| 01 0b 00 4c 04 c1 00 04 | 00 00 20 97 00 1f 00 08 |...L....|.. .....|
|000048a0| 00 20 45 64 69 74 20 73 | 74 72 69 6e 67 20 66 69 |. Edit s|tring fi|
|000048b0| 65 6c 64 73 20 64 69 72 | 65 63 74 6c 79 2e 20 00 |elds dir|ectly. .|
|000048c0| 20 0b 00 63 03 11 00 98 | 02 45 01 0b 00 11 04 0b | ..c....|.E......|
|000048d0| 00 a2 05 0e 00 03 00 f7 | 03 0b 00 63 03 12 00 98 |........|...c....|
|000048e0| 02 00 20 97 00 31 00 08 | 00 20 52 65 73 75 6c 74 |.. ..1..|. Result|
|000048f0| 20 6f 66 20 65 64 69 74 | 20 64 65 74 65 72 6d 69 | of edit| determi|
|00004900| 6e 65 73 20 77 68 65 74 | 68 65 72 20 74 6f 20 63 |nes whet|her to c|
|00004910| 6f 6e 74 69 6e 75 65 2e | 00 00 20 0b 00 a2 05 0b |ontinue.|.. .....|
|00004920| 00 d8 01 03 01 5d 00 00 | 00 55 00 ff ff 00 00 00 |.....]..|.U......|
|00004930| 20 0b 00 45 04 e2 00 0b | 00 4c 04 e2 00 0b 00 11 | ..E....|.L......|
|00004940| 04 e2 00 00 20 73 01 0b | 00 45 04 73 01 0b 00 4c |.... s..|.E.s...L|
|00004950| 04 c1 00 04 00 00 20 0b | 00 63 03 11 00 a1 02 45 |...... .|.c.....E|
|00004960| 01 0b 00 11 04 0b 00 a2 | 05 0e 00 03 00 f7 03 0b |........|........|
|00004970| 00 63 03 12 00 a1 02 00 | 20 0b 00 a2 05 0b 00 d8 |.c......| .......|
|00004980| 01 03 01 5d 00 00 00 55 | 00 ff ff 00 00 00 20 0b |...]...U|...... .|
|00004990| 00 45 04 e2 00 0b 00 4c | 04 e2 00 0b 00 11 04 e2 |.E.....L|........|
|000049a0| 00 00 20 73 01 0b 00 45 | 04 73 01 0b 00 4c 04 c1 |.. s...E|.s...L..|
|000049b0| 00 04 00 00 20 97 00 31 | 00 08 00 20 43 6f 6e 76 |.... ..1|... Conv|
|000049c0| 65 72 74 20 6e 75 6d 65 | 72 69 63 20 66 69 65 6c |ert nume|ric fiel|
|000049d0| 64 73 20 74 6f 20 73 74 | 72 69 6e 67 73 20 66 6f |ds to st|rings fo|
|000049e0| 72 20 65 64 69 74 69 6e | 67 2e 00 00 20 0b 00 63 |r editin|g... ..c|
|000049f0| 03 11 00 a9 02 51 01 2b | 01 0c 14 d9 04 00 20 0b |.....Q.+|...... .|
|00004a00| 14 d9 04 0b 00 11 04 0b | 00 a2 05 0e 00 03 00 f7 |........|........|
|00004a10| 03 0c 14 d9 04 00 20 97 | 00 21 00 08 00 20 43 6f |...... .|.!... Co|
|00004a20| 6e 76 65 72 74 20 72 65 | 73 75 6c 74 20 62 61 63 |nvert re|sult bac|
|00004a30| 6b 20 74 6f 20 6e 75 6d | 62 65 72 2e 00 00 20 0b |k to num|ber... .|
|00004a40| 14 d9 04 5a 01 0b 00 63 | 03 12 00 a9 02 00 20 73 |...Z...c|...... s|
|00004a50| 01 0b 00 45 04 73 01 0b | 00 4c 04 c1 00 04 00 00 |...E.s..|.L......|
|00004a60| 20 6d 01 04 00 23 23 5f | 2f ff 00 0b 00 63 03 11 | m...##_|/....c..|
|00004a70| 00 a9 02 95 00 93 00 00 | 20 0b 00 a2 05 0b 00 d8 |........| .......|
|00004a80| 01 03 01 5d 00 00 00 55 | 00 ff ff 00 00 00 20 0b |...]...U|...... .|
|00004a90| 00 45 04 e2 00 0b 00 4c | 04 e2 00 0b 00 11 04 e2 |.E.....L|........|
|00004aa0| 00 00 20 73 01 0b 00 45 | 04 73 01 0b 00 4c 04 c1 |.. s...E|.s...L..|
|00004ab0| 00 04 00 00 20 0b 00 63 | 03 11 00 b2 02 51 01 2b |.... ..c|.....Q.+|
|00004ac0| 01 0c 14 d9 04 00 20 0b | 14 d9 04 0b 00 11 04 0b |...... .|........|
|00004ad0| 00 a2 05 0e 00 03 00 f7 | 03 0c 14 d9 04 00 20 0b |........|...... .|
|00004ae0| 14 d9 04 5a 01 0b 00 63 | 03 12 00 b2 02 00 20 73 |...Z...c|...... s|
|00004af0| 01 0b 00 45 04 73 01 0b | 00 4c 04 c1 00 04 00 00 |...E.s..|.L......|
|00004b00| 20 6d 01 04 00 23 23 5f | 2f ff 00 0b 00 63 03 11 | m...##_|/....c..|
|00004b10| 00 b2 02 95 00 93 00 00 | 20 0b 00 a2 05 0b 00 d8 |........| .......|
|00004b20| 01 03 01 5d 00 00 00 55 | 00 ff ff 00 00 00 20 0b |...]...U|...... .|
|00004b30| 00 45 04 e2 00 0b 00 4c | 04 e2 00 0b 00 11 04 e2 |.E.....L|........|
|00004b40| 00 00 20 73 01 0b 00 45 | 04 73 01 0b 00 4c 04 c1 |.. s...E|.s...L..|
|00004b50| 00 04 00 00 20 0b 00 63 | 03 11 00 b9 02 51 01 2b |.... ..c|.....Q.+|
|00004b60| 01 0c 14 d9 04 00 20 0b | 14 d9 04 0b 00 11 04 0b |...... .|........|
|00004b70| 00 a2 05 0e 00 03 00 f7 | 03 0c 14 d9 04 00 20 0b |........|...... .|
|00004b80| 14 d9 04 5a 01 0b 00 63 | 03 12 00 b9 02 00 20 73 |...Z...c|...... s|
|00004b90| 01 0b 00 45 04 73 01 0b | 00 4c 04 c1 00 04 00 00 |...E.s..|.L......|
|00004ba0| 20 6d 01 02 00 23 23 ff | 00 0b 00 63 03 11 00 b9 | m...##.|...c....|
|00004bb0| 02 95 00 93 00 00 20 0b | 00 a2 05 0b 00 d8 01 03 |...... .|........|
|00004bc0| 01 5d 00 00 00 55 00 ff | ff 00 00 00 20 0b 00 45 |.]...U..|.... ..E|
|00004bd0| 04 e2 00 0b 00 4c 04 e2 | 00 0b 00 11 04 e2 00 00 |.....L..|........|
|00004be0| 20 73 01 0b 00 45 04 73 | 01 0b 00 4c 04 c1 00 04 | s...E.s|...L....|
|00004bf0| 00 00 20 0b 00 63 03 11 | 00 c1 02 45 01 0b 00 11 |.. ..c..|...E....|
|00004c00| 04 0b 00 a2 05 0e 00 03 | 00 f7 03 0b 00 63 03 12 |........|.....c..|
|00004c10| 00 c1 02 00 20 0b 00 63 | 03 11 00 c1 02 0b 00 63 |.... ..c|.......c|
|00004c20| 03 11 00 c1 02 e6 00 00 | 20 0b 00 a2 05 0b 00 d8 |........| .......|
|00004c30| 01 03 01 5d 00 00 00 55 | 00 ff ff 00 00 00 20 0b |...]...U|...... .|
|00004c40| 00 45 04 e2 00 0b 00 4c | 04 e2 00 0b 00 11 04 e2 |.E.....L|........|
|00004c50| 00 00 20 73 01 0b 00 45 | 04 73 01 0b 00 4c 04 c1 |.. s...E|.s...L..|
|00004c60| 00 04 00 00 20 0b 00 63 | 03 11 00 ca 02 45 01 0b |.... ..c|.....E..|
|00004c70| 00 11 04 0b 00 a2 05 0e | 00 03 00 f7 03 0b 00 63 |........|.......c|
|00004c80| 03 12 00 ca 02 00 20 0b | 00 a2 05 0b 00 d8 01 03 |...... .|........|
|00004c90| 01 5d 00 00 00 55 00 ff | ff 00 00 00 20 0b 00 45 |.]...U..|.... ..E|
|00004ca0| 04 e2 00 0b 00 4c 04 e2 | 00 0b 00 11 04 e2 00 00 |.....L..|........|
|00004cb0| 20 73 01 0b 00 45 04 73 | 01 0b 00 4c 04 c1 00 04 | s...E.s|...L....|
|00004cc0| 00 00 20 0b 00 63 03 11 | 00 d4 02 45 01 0b 00 11 |.. ..c..|...E....|
|00004cd0| 04 0b 00 a2 05 0e 00 03 | 00 f7 03 0b 00 63 03 12 |........|.....c..|
|00004ce0| 00 d4 02 00 20 0b 00 a2 | 05 0b 00 d8 01 03 01 5d |.... ...|.......]|
|00004cf0| 00 00 00 55 00 ff ff 00 | 00 00 20 0b 00 45 04 e2 |...U....|.. ..E..|
|00004d00| 00 0b 00 4c 04 e2 00 0b | 00 11 04 e2 00 00 20 73 |...L....|...... s|
|00004d10| 01 0b 00 45 04 73 01 0b | 00 4c 04 c1 00 04 00 00 |...E.s..|.L......|
|00004d20| 20 0b 00 63 03 11 00 dc | 02 45 01 0b 00 11 04 0b | ..c....|.E......|
|00004d30| 00 a2 05 0e 00 03 00 f7 | 03 0b 00 63 03 12 00 dc |........|...c....|
|00004d40| 02 00 20 0b 00 a2 05 0b | 00 d8 01 03 01 5d 00 00 |.. .....|.....]..|
|00004d50| 00 55 00 ff ff 00 00 00 | 20 0b 00 45 04 e2 00 0b |.U......| ..E....|
|00004d60| 00 4c 04 e2 00 0b 00 11 | 04 e2 00 00 20 73 01 0b |.L......|.... s..|
|00004d70| 00 45 04 73 01 0b 00 4c | 04 c1 00 04 00 00 20 0b |.E.s...L|...... .|
|00004d80| 00 63 03 11 00 e5 02 45 | 01 0b 00 11 04 0b 00 a2 |.c.....E|........|
|00004d90| 05 0e 00 03 00 f7 03 0b | 00 63 03 12 00 e5 02 00 |........|.c......|
|00004da0| 20 0b 00 a2 05 0b 00 d8 | 01 03 01 5d 00 00 00 55 | .......|...]...U|
|00004db0| 00 ff ff 00 00 00 10 62 | 00 ff ff 00 00 00 00 51 |.......b|.......Q|
|00004dc0| 00 09 00 08 00 ff ff 04 | 00 ff ff ff ff 5a 00 00 |........|.....Z..|
|00004dd0| 00 ff ff 02 0c 00 09 00 | 49 6e 69 74 49 6e 64 65 |........|InitInde|
|00004de0| 78 01 00 b8 a6 03 00 00 | 1b 00 ff ff c1 ff ff ff |x.......|........|
|00004df0| 00 00 97 00 03 00 00 00 | 2a 04 00 00 97 00 41 00 |........|*.....A.|
|00004e00| 00 00 2a 20 49 6e 69 74 | 49 6e 64 65 78 20 2d 20 |..* Init|Index - |
|00004e10| 52 65 61 64 73 20 72 65 | 63 6f 72 64 73 20 66 72 |Reads re|cords fr|
|00004e20| 6f 6d 20 66 69 6c 65 20 | 61 6e 64 20 61 73 73 69 |om file |and assi|
|00004e30| 67 6e 73 20 65 61 63 68 | 20 76 61 6c 75 65 20 74 |gns each| value t|
|00004e40| 6f 2e 00 00 97 00 42 00 | 00 00 2a 20 61 72 72 61 |o.....B.|..* arra|
|00004e50| 79 20 72 65 63 6f 72 64 | 73 2e 20 49 6e 64 65 78 |y record|s. Index|
|00004e60| 20 76 61 6c 75 65 73 20 | 61 72 65 20 73 65 74 20 | values |are set |
|00004e70| 74 6f 20 74 68 65 20 61 | 63 74 75 61 6c 20 6f 72 |to the a|ctual or|
|00004e80| 64 65 72 20 6f 66 20 74 | 68 65 00 00 97 00 45 00 |der of t|he....E.|
|00004e90| 00 00 2a 20 72 65 63 6f | 72 64 73 20 69 6e 20 74 |..* reco|rds in t|
|00004ea0| 68 65 20 66 69 6c 65 2e | 20 54 68 65 20 6f 72 64 |he file.| The ord|
|00004eb0| 65 72 20 6f 66 20 72 65 | 63 6f 72 64 73 20 69 6e |er of re|cords in|
|00004ec0| 20 74 68 65 20 61 72 72 | 61 79 20 6d 61 79 20 63 | the arr|ay may c|
|00004ed0| 68 61 6e 67 65 72 00 00 | 97 00 41 00 00 00 2a 20 |hanger..|..A...* |
|00004ee0| 62 65 63 61 75 73 65 20 | 6f 66 20 73 6f 72 74 69 |because |of sorti|
|00004ef0| 6e 67 20 6f 72 20 61 64 | 64 69 74 69 6f 6e 73 2c |ng or ad|ditions,|
|00004f00| 20 62 75 74 20 74 68 65 | 20 43 61 72 64 4e 75 6d | but the| CardNum|
|00004f10| 20 66 69 65 6c 64 20 61 | 6c 77 61 79 73 61 00 00 | field a|lwaysa..|
|00004f20| 97 00 45 00 00 00 2a 20 | 68 61 73 20 74 68 65 20 |..E...* |has the |
|00004f30| 70 6f 73 69 74 69 6f 6e | 20 69 6e 20 77 68 69 63 |position| in whic|
|00004f40| 68 20 74 68 65 20 72 65 | 63 6f 72 64 20 61 63 74 |h the re|cord act|
|00004f50| 75 61 6c 6c 79 20 6f 63 | 63 75 72 73 20 69 6e 20 |ually oc|curs in |
|00004f60| 74 68 65 20 66 69 6c 65 | 2e 72 00 00 97 00 03 00 |the file|.r......|
|00004f70| 00 00 2a 20 00 00 97 00 | 31 00 00 00 2a 20 50 61 |..* ....|1...* Pa|
|00004f80| 72 61 6d 73 3a 20 4c 61 | 73 74 43 61 72 64 20 2d |rams: La|stCard -|
|00004f90| 20 6e 75 6d 62 65 72 20 | 6f 66 20 72 65 63 6f 72 | number |of recor|
|00004fa0| 64 73 20 69 6e 20 61 72 | 72 61 79 20 00 00 97 00 |ds in ar|ray ....|
|00004fb0| 03 00 00 00 2a 20 00 00 | 97 00 1a 00 00 00 2a 20 |....* ..|......* |
|00004fc0| 49 6e 70 75 74 3a 20 20 | 46 69 6c 65 20 44 49 53 |Input:  |File DIS|
|00004fd0| 4b 46 49 4c 45 24 00 00 | 97 00 03 00 00 00 2a 20 |KFILE$..|......* |
|00004fe0| 00 00 76 00 0c 00 6b 03 | 00 01 01 00 1a 03 00 00 |..v...k.|........|
|00004ff0| 01 00 00 00 7d 01 ff ff | 15 00 83 02 09 00 0d 00 |....}...|........|
|00005000| 63 03 00 00 00 10 0b 00 | f4 06 64 05 0b 00 1a 03 |c.......|..d.....|
|00005010| 56 00 ff ff ff ff 00 10 | 00 20 97 00 3f 00 08 00 |V.......|. ..?...|
|00005020| 20 52 65 61 64 20 61 20 | 72 65 63 6f 72 64 20 66 | Read a |record f|
|00005030| 72 6f 6d 20 74 68 65 20 | 66 69 6c 65 20 61 6e 64 |rom the |file and|
|00005040| 20 70 75 74 20 65 61 63 | 68 20 66 69 65 6c 64 20 | put eac|h field |
|00005050| 69 6e 20 74 68 65 20 61 | 72 72 61 79 2e 20 00 20 |in the a|rray. . |
|00005060| 64 05 8a 00 0b 00 f4 06 | 0b 00 63 03 b3 00 ff ff |d.......|..c.....|
|00005070| 00 20 0b 00 f4 06 0b 00 | f4 06 0e 00 01 00 72 04 |. ......|......r.|
|00005080| 12 00 8d 02 00 20 0b 00 | 63 03 11 00 98 02 0b 00 |..... ..|c.......|
|00005090| f4 06 0e 00 01 00 72 04 | 12 00 98 02 00 20 0b 00 |......r.|..... ..|
|000050a0| 63 03 11 00 a1 02 0b 00 | f4 06 0e 00 01 00 72 04 |c.......|......r.|
|000050b0| 12 00 a1 02 00 20 0b 00 | 63 03 11 00 a9 02 0b 00 |..... ..|c.......|
|000050c0| f4 06 0e 00 01 00 72 04 | 12 00 a9 02 00 20 0b 00 |......r.|..... ..|
|000050d0| 63 03 11 00 b2 02 0b 00 | f4 06 0e 00 01 00 72 04 |c.......|......r.|
|000050e0| 12 00 b2 02 00 20 0b 00 | 63 03 11 00 b9 02 0b 00 |..... ..|c.......|
|000050f0| f4 06 0e 00 01 00 72 04 | 12 00 b9 02 00 20 0b 00 |......r.|..... ..|
|00005100| 63 03 11 00 c1 02 0b 00 | f4 06 0e 00 01 00 72 04 |c.......|......r.|
|00005110| 12 00 c1 02 00 20 0b 00 | 63 03 11 00 ca 02 0b 00 |..... ..|c.......|
|00005120| f4 06 0e 00 01 00 72 04 | 12 00 ca 02 00 20 0b 00 |......r.|..... ..|
|00005130| 63 03 11 00 d4 02 0b 00 | f4 06 0e 00 01 00 72 04 |c.......|......r.|
|00005140| 12 00 d4 02 00 20 0b 00 | 63 03 11 00 dc 02 0b 00 |..... ..|c.......|
|00005150| f4 06 0e 00 01 00 72 04 | 12 00 dc 02 00 20 0b 00 |......r.|..... ..|
|00005160| 63 03 11 00 e5 02 0b 00 | f4 06 0e 00 01 00 72 04 |c.......|......r.|
|00005170| 12 00 e5 02 00 00 00 10 | 0b 00 f4 06 66 00 ff ff |........|....f...|
|00005180| ff ff 00 00 00 00 51 00 | 09 00 08 00 ff ff 04 00 |......Q.|........|
|00005190| ff ff ff ff 22 00 00 00 | ff ff 02 0c 00 0a 00 50 |...."...|.......P|
|000051a0| 72 69 6e 74 4c 61 62 65 | 6c 01 00 38 b8 01 00 00 |rintLabe|l..8....|
|000051b0| 1b 00 ff ff c1 ff ff ff | 00 00 97 00 03 00 00 00 |........|........|
|000051c0| 2a ff 00 00 97 00 49 00 | 00 00 2a 20 50 72 69 6e |*.....I.|..* Prin|
|000051d0| 74 4c 61 62 65 6c 20 2d | 20 50 72 69 6e 74 73 20 |tLabel -| Prints |
|000051e0| 74 68 65 20 6e 61 6d 65 | 2c 20 61 64 64 72 65 73 |the name|, addres|
|000051f0| 73 2c 20 63 69 74 79 2c | 20 73 74 61 74 65 2c 20 |s, city,| state, |
|00005200| 61 6e 64 20 7a 69 70 20 | 63 6f 64 65 20 66 72 6f |and zip |code fro|
|00005210| 6d 00 00 00 97 00 47 00 | 00 00 2a 20 61 20 63 61 |m.....G.|..* a ca|
|00005220| 72 64 2e 20 54 68 69 73 | 20 53 55 42 20 63 6f 75 |rd. This| SUB cou|
|00005230| 6c 64 20 65 61 73 69 6c | 79 20 62 65 20 6d 6f 64 |ld easil|y be mod|
|00005240| 69 66 69 65 64 20 74 6f | 20 70 72 69 6e 74 20 61 |ified to| print a|
|00005250| 20 72 65 74 75 72 6e 20 | 61 64 64 72 65 73 73 6f | return |addresso|
|00005260| 00 00 97 00 29 00 00 00 | 2a 20 6f 72 20 63 65 6e |....)...|* or cen|
|00005270| 74 65 72 20 74 68 65 20 | 61 64 64 72 65 73 73 20 |ter the |address |
|00005280| 6f 6e 20 61 6e 20 65 6e | 76 65 6c 6f 70 65 2e 66 |on an en|velope.f|
|00005290| 00 00 97 00 03 00 00 00 | 2a 20 00 00 97 00 2e 00 |........|* ......|
|000052a0| 00 00 2a 20 50 61 72 61 | 6d 73 3a 20 43 61 72 64 |..* Para|ms: Card|
|000052b0| 20 2d 20 61 6c 6c 20 74 | 68 65 20 64 61 74 61 20 | - all t|he data |
|000052c0| 61 62 6f 75 74 20 61 20 | 70 65 72 73 6f 6e 00 00 |about a |person..|
|000052d0| 97 00 03 00 00 00 2a 20 | 00 00 97 00 13 00 00 00 |......* |........|
|000052e0| 2a 20 4f 75 74 70 75 74 | 3a 20 50 72 69 6e 74 65 |* Output|: Printe|
|000052f0| 72 61 00 00 97 00 03 00 | 00 00 2a 20 00 00 76 00 |ra......|..* ..v.|
|00005300| 0c 00 78 03 00 01 01 00 | 63 03 00 20 83 02 00 00 |..x.....|c.. ....|
|00005310| 00 10 c3 00 0b 00 63 03 | 11 00 98 02 96 00 00 10 |......c.|........|
|00005320| c3 00 0b 00 63 03 11 00 | ca 02 96 00 00 10 c3 00 |....c...|........|
|00005330| 0b 00 63 03 11 00 d4 02 | 95 00 6d 01 02 00 2c 20 |..c.....|..m..., |
|00005340| 95 00 0b 00 63 03 11 00 | dc 02 95 00 0b 00 63 03 |....c...|......c.|
|00005350| 11 00 e5 02 96 00 00 10 | c3 00 93 00 00 00 00 00 |........|........|
|00005360| 51 00 09 00 08 00 ff ff | 04 00 ff ff ff ff 12 00 |Q.......|........|
|00005370| 00 00 ff ff 02 0c 00 09 | 00 53 6f 72 74 49 6e 64 |........|.SortInd|
|00005380| 65 78 01 00 38 3a 08 00 | 00 1b 00 ff ff c1 ff ff |ex..8:..|........|
|00005390| ff 00 00 97 00 03 00 00 | 00 2a 00 00 00 97 00 44 |........|.*.....D|
|000053a0| 00 00 00 2a 20 53 6f 72 | 74 49 6e 64 65 78 20 2d |...* Sor|tIndex -|
|000053b0| 20 53 6f 72 74 73 20 61 | 6c 6c 20 72 65 63 6f 72 | Sorts a|ll recor|
|000053c0| 64 73 20 69 6e 20 6d 65 | 6d 6f 72 79 20 61 63 63 |ds in me|mory acc|
|000053d0| 6f 72 64 69 6e 67 20 74 | 6f 20 61 20 73 70 65 63 |ording t|o a spec|
|000053e0| 69 66 69 65 64 00 00 97 | 00 45 00 00 00 2a 20 66 |ified...|.E...* f|
|000053f0| 69 65 6c 64 2e 20 41 66 | 74 65 72 20 74 68 65 20 |ield. Af|ter the |
|00005400| 73 6f 72 74 2c 20 74 68 | 65 20 66 69 72 73 74 20 |sort, th|e first |
|00005410| 72 65 63 6f 72 64 20 69 | 6e 20 6d 65 6d 6f 72 79 |record i|n memory|
|00005420| 20 62 65 63 6f 6d 65 73 | 20 74 68 65 20 74 6f 70 | becomes| the top|
|00005430| 00 00 00 97 00 46 00 00 | 00 2a 20 63 61 72 64 2e |.....F..|.* card.|
|00005440| 20 4e 6f 74 65 20 74 68 | 61 74 20 61 6c 74 68 6f | Note th|at altho|
|00005450| 75 67 68 20 74 68 65 20 | 6f 72 64 65 72 20 69 73 |ugh the |order is|
|00005460| 20 63 68 61 6e 67 65 64 | 20 69 6e 20 6d 65 6d 6f | changed| in memo|
|00005470| 72 79 2c 20 74 68 65 20 | 6f 72 64 65 72 00 00 97 |ry, the |order...|
|00005480| 00 45 00 00 00 2a 20 72 | 65 6d 61 69 6e 73 20 74 |.E...* r|emains t|
|00005490| 68 65 20 73 61 6d 65 20 | 69 6e 20 74 68 65 20 66 |he same |in the f|
|000054a0| 69 6c 65 2e 20 54 68 65 | 20 74 72 75 65 20 66 69 |ile. The| true fi|
|000054b0| 6c 65 20 6f 72 64 65 72 | 20 69 73 20 73 68 6f 77 |le order| is show|
|000054c0| 6e 20 62 79 20 74 68 65 | 72 00 00 97 00 49 00 00 |n by the|r....I..|
|000054d0| 00 2a 20 43 61 72 64 4e | 75 6d 20 66 69 65 6c 64 |.* CardN|um field|
|000054e0| 20 6f 66 20 65 61 63 68 | 20 72 65 63 6f 72 64 2e | of each| record.|
|000054f0| 20 54 68 69 73 20 53 55 | 42 20 75 73 65 73 20 74 | This SU|B uses t|
|00005500| 68 65 20 53 68 65 6c 6c | 20 73 6f 72 74 20 61 6c |he Shell| sort al|
|00005510| 67 6f 72 69 74 68 6d 2e | 65 00 00 97 00 03 00 00 |gorithm.|e.......|
|00005520| 00 2a 20 00 00 97 00 3e | 00 00 00 2a 20 50 61 72 |.* ....>|...* Par|
|00005530| 61 6d 73 3a 20 53 6f 72 | 74 46 69 65 6c 64 20 2d |ams: Sor|tField -|
|00005540| 20 30 2d 62 61 73 65 64 | 20 6e 75 6d 62 65 72 20 | 0-based| number |
|00005550| 6f 66 20 74 68 65 20 66 | 69 65 6c 64 20 74 6f 20 |of the f|ield to |
|00005560| 73 6f 72 74 20 6f 6e 00 | 00 97 00 24 00 00 00 2a |sort on.|...$...*|
|00005570| 0d 09 20 4c 61 73 74 43 | 61 72 64 20 2d 20 6e 75 |.. LastC|ard - nu|
|00005580| 6d 62 65 72 20 6f 66 20 | 6c 61 73 74 20 63 61 72 |mber of |last car|
|00005590| 64 00 00 97 00 03 00 00 | 00 2a 0d 00 00 76 00 12 |d.......|.*...v..|
|000055a0| 00 86 03 00 01 02 00 93 | 03 00 00 01 00 1a 03 00 |........|........|
|000055b0| 00 01 00 00 00 00 10 97 | 00 37 00 04 00 20 53 65 |........|.7... Se|
|000055c0| 74 20 63 6f 6d 70 61 72 | 69 73 6f 6e 20 6f 66 66 |t compar|ison off|
|000055d0| 73 65 74 20 74 6f 20 68 | 61 6c 66 20 74 68 65 20 |set to h|alf the |
|000055e0| 6e 75 6d 62 65 72 20 6f | 66 20 72 65 63 6f 72 64 |number o|f record|
|000055f0| 73 2e 73 00 10 0b 00 1a | 03 64 09 60 01 0c 00 20 |s.s.....|.d.`... |
|00005600| 07 00 00 00 10 97 00 22 | 00 04 00 20 4c 6f 6f 70 |......."|... Loop|
|00005610| 20 75 6e 74 69 6c 20 6f | 66 66 73 65 74 20 67 65 | until o|ffset ge|
|00005620| 74 73 20 74 6f 20 7a 65 | 72 6f 2e 00 10 0b 00 20 |ts to ze|ro..... |
|00005630| 07 64 01 5f 01 48 00 ff | ff 00 00 00 20 0b 00 1a |.d._.H..|.... ...|
|00005640| 03 0b 00 20 07 77 01 0c | 00 2a 07 00 00 00 20 46 |... .w..|.*.... F|
|00005650| 00 00 00 00 30 97 00 25 | 00 0c 00 20 41 73 73 75 |....0..%|... Assu|
|00005660| 6d 65 20 6e 6f 20 73 77 | 69 74 63 68 65 73 20 61 |me no sw|itches a|
|00005670| 74 20 74 68 69 73 20 6f | 66 66 73 65 74 2e 6e 00 |t this o|ffset.n.|
|00005680| 30 0b 00 d8 01 0c 00 33 | 07 00 00 00 30 97 00 36 |0......3|....0..6|
|00005690| 00 0c 00 20 43 6f 6d 70 | 61 72 65 20 65 6c 65 6d |... Comp|are elem|
|000056a0| 65 6e 74 73 20 66 6f 72 | 20 74 68 65 20 73 70 65 |ents for| the spe|
|000056b0| 63 69 66 69 65 64 20 66 | 69 65 6c 64 20 61 6e 64 |cified f|ield and|
|000056c0| 20 73 77 69 74 63 68 00 | 30 97 00 1d 00 0c 00 20 | switch.|0...... |
|000056d0| 61 6e 79 20 74 68 61 74 | 20 61 72 65 20 6f 75 74 |any that| are out|
|000056e0| 20 6f 66 20 6f 72 64 65 | 72 2e 70 00 30 0b 00 3d | of orde|r.p.0..=|
|000056f0| 07 64 05 0b 00 2a 07 56 | 00 ff ff ff ff 00 40 0b |.d...*.V|......@.|
|00005700| 00 93 03 74 00 ff ff 00 | 50 0b 00 19 02 3b 00 00 |...t....|P....;..|
|00005710| 60 0b 00 3d 07 0e 00 01 | 00 72 04 11 00 98 02 0b |`..=....|.r......|
|00005720| 00 3d 07 0b 00 20 07 00 | 01 0e 00 01 00 72 04 11 |.=... ..|.....r..|
|00005730| 00 98 02 5f 01 61 00 00 | 00 01 00 1c 00 0b 00 3d |..._.a..|.......=|
|00005740| 07 0e 00 01 00 72 04 0b | 00 3d 07 0b 00 20 07 00 |.....r..|.=... ..|
|00005750| 01 0e 00 01 00 72 04 ed | 00 ff ff 01 00 1c 00 0b |.....r..|........|
|00005760| 00 3d 07 0c 00 33 07 00 | 60 50 00 00 50 0b 00 24 |.=...3..|`P..P..$|
|00005770| 02 3b 00 00 60 0b 00 3d | 07 0e 00 01 00 72 04 11 |.;..`..=|.....r..|
|00005780| 00 a1 02 0b 00 3d 07 0b | 00 20 07 00 01 0e 00 01 |.....=..|. ......|
|00005790| 00 72 04 11 00 a1 02 5f | 01 61 00 00 00 01 00 1c |.r....._|.a......|
|000057a0| 00 0b 00 3d 07 0e 00 01 | 00 72 04 0b 00 3d 07 0b |...=....|.r...=..|
|000057b0| 00 20 07 00 01 0e 00 01 | 00 72 04 ed 00 ff ff 01 |. ......|.r......|
|000057c0| 00 1c 00 0b 00 3d 07 0c | 00 33 07 00 60 50 00 00 |.....=..|.3..`P..|
|000057d0| 50 0b 00 2d 02 3b 00 00 | 60 0b 00 3d 07 0e 00 01 |P..-.;..|`..=....|
|000057e0| 00 72 04 11 00 a9 02 0b | 00 3d 07 0b 00 20 07 00 |.r......|.=... ..|
|000057f0| 01 0e 00 01 00 72 04 11 | 00 a9 02 5f 01 61 00 00 |.....r..|..._.a..|
|00005800| 00 01 00 1c 00 0b 00 3d | 07 0e 00 01 00 72 04 0b |.......=|.....r..|
|00005810| 00 3d 07 0b 00 20 07 00 | 01 0e 00 01 00 72 04 ed |.=... ..|.....r..|
|00005820| 00 ff ff 01 00 1c 00 0b | 00 3d 07 0c 00 33 07 00 |........|.=...3..|
|00005830| 60 50 00 00 50 0b 00 37 | 02 3b 00 00 60 0b 00 3d |`P..P..7|.;..`..=|
|00005840| 07 0e 00 01 00 72 04 11 | 00 b2 02 0b 00 3d 07 0b |.....r..|.....=..|
|00005850| 00 20 07 00 01 0e 00 01 | 00 72 04 11 00 b2 02 5f |. ......|.r....._|
|00005860| 01 61 00 00 00 01 00 1c | 00 0b 00 3d 07 0e 00 01 |.a......|...=....|
|00005870| 00 72 04 0b 00 3d 07 0b | 00 20 07 00 01 0e 00 01 |.r...=..|. ......|
|00005880| 00 72 04 ed 00 ff ff 01 | 00 1c 00 0b 00 3d 07 0c |.r......|.....=..|
|00005890| 00 33 07 00 60 50 00 00 | 50 0b 00 3f 02 3b 00 00 |.3..`P..|P..?.;..|
|000058a0| 60 0b 00 3d 07 0e 00 01 | 00 72 04 11 00 b9 02 0b |`..=....|.r......|
|000058b0| 00 3d 07 0b 00 20 07 00 | 01 0e 00 01 00 72 04 11 |.=... ..|.....r..|
|000058c0| 00 b9 02 5f 01 61 00 00 | 00 01 00 1c 00 0b 00 3d |..._.a..|.......=|
|000058d0| 07 0e 00 01 00 72 04 0b | 00 3d 07 0b 00 20 07 00 |.....r..|.=... ..|
|000058e0| 01 0e 00 01 00 72 04 ed | 00 ff ff 01 00 1c 00 0b |.....r..|........|
|000058f0| 00 3d 07 0c 00 33 07 00 | 60 50 00 00 50 0b 00 48 |.=...3..|`P..P..H|
|00005900| 02 3b 00 00 60 0b 00 3d | 07 0e 00 01 00 72 04 11 |.;..`..=|.....r..|
|00005910| 00 c1 02 0b 00 3d 07 0b | 00 20 07 00 01 0e 00 01 |.....=..|. ......|
|00005920| 00 72 04 11 00 c1 02 5f | 01 61 00 00 00 01 00 1c |.r....._|.a......|
|00005930| 00 0b 00 3d 07 0e 00 01 | 00 72 04 0b 00 3d 07 0b |...=....|.r...=..|
|00005940| 00 20 07 00 01 0e 00 01 | 00 72 04 ed 00 ff ff 01 |. ......|.r......|
|00005950| 00 1c 00 0b 00 3d 07 0c | 00 33 07 00 60 50 00 00 |.....=..|.3..`P..|
|00005960| 50 0b 00 52 02 3b 00 00 | 60 0b 00 3d 07 0e 00 01 |P..R.;..|`..=....|
|00005970| 00 72 04 11 00 ca 02 0b | 00 3d 07 0b 00 20 07 00 |.r......|.=... ..|
|00005980| 01 0e 00 01 00 72 04 11 | 00 ca 02 5f 01 61 00 00 |.....r..|..._.a..|
|00005990| 00 01 00 1c 00 0b 00 3d | 07 0e 00 01 00 72 04 0b |.......=|.....r..|
|000059a0| 00 3d 07 0b 00 20 07 00 | 01 0e 00 01 00 72 04 ed |.=... ..|.....r..|
|000059b0| 00 ff ff 01 00 1c 00 0b | 00 3d 07 0c 00 33 07 00 |........|.=...3..|
|000059c0| 60 50 00 00 50 0b 00 5d | 02 3b 00 00 60 0b 00 3d |`P..P..]|.;..`..=|
|000059d0| 07 0e 00 01 00 72 04 11 | 00 d4 02 0b 00 3d 07 0b |.....r..|.....=..|
|000059e0| 00 20 07 00 01 0e 00 01 | 00 72 04 11 00 d4 02 5f |. ......|.r....._|
|000059f0| 01 61 00 00 00 01 00 1c | 00 0b 00 3d 07 0e 00 01 |.a......|...=....|
|00005a00| 00 72 04 0b 00 3d 07 0b | 00 20 07 00 01 0e 00 01 |.r...=..|. ......|
|00005a10| 00 72 04 ed 00 ff ff 01 | 00 1c 00 0b 00 3d 07 0c |.r......|.....=..|
|00005a20| 00 33 07 00 60 50 00 00 | 50 0b 00 66 02 3b 00 00 |.3..`P..|P..f.;..|
|00005a30| 60 0b 00 3d 07 0e 00 01 | 00 72 04 11 00 dc 02 0b |`..=....|.r......|
|00005a40| 00 3d 07 0b 00 20 07 00 | 01 0e 00 01 00 72 04 11 |.=... ..|.....r..|
|00005a50| 00 dc 02 5f 01 61 00 00 | 00 01 00 1c 00 0b 00 3d |..._.a..|.......=|
|00005a60| 07 0e 00 01 00 72 04 0b | 00 3d 07 0b 00 20 07 00 |.....r..|.=... ..|
|00005a70| 01 0e 00 01 00 72 04 ed | 00 ff ff 01 00 1c 00 0b |.....r..|........|
|00005a80| 00 3d 07 0c 00 33 07 00 | 60 50 00 00 50 0b 00 70 |.=...3..|`P..P..p|
|00005a90| 02 3b 00 00 60 0b 00 3d | 07 0e 00 01 00 72 04 11 |.;..`..=|.....r..|
|00005aa0| 00 e5 02 0b 00 3d 07 0b | 00 20 07 00 01 0e 00 01 |.....=..|. ......|
|00005ab0| 00 72 04 11 00 e5 02 5f | 01 61 00 00 00 01 00 1c |.r....._|.a......|
|00005ac0| 00 0b 00 3d 07 0e 00 01 | 00 72 04 0b 00 3d 07 0b |...=....|.r...=..|
|00005ad0| 00 20 07 00 01 0e 00 01 | 00 72 04 ed 00 ff ff 01 |. ......|.r......|
|00005ae0| 00 1c 00 0b 00 3d 07 0c | 00 33 07 00 60 50 00 00 |.....=..|.3..`P..|
|00005af0| 40 52 00 00 00 00 30 0b | 00 3d 07 66 00 ff ff ff |@R....0.|.=.f....|
|00005b00| ff 00 00 00 30 97 00 41 | 00 0c 00 20 53 6f 72 74 |....0..A|... Sort|
|00005b10| 20 6f 6e 20 6e 65 78 74 | 20 70 61 73 73 20 6f 6e | on next| pass on|
|00005b20| 6c 79 20 74 6f 20 6c 6f | 63 61 74 69 6f 6e 20 77 |ly to lo|cation w|
|00005b30| 68 65 72 65 20 6c 61 73 | 74 20 73 77 69 74 63 68 |here las|t switch|
|00005b40| 20 77 61 73 20 6d 61 64 | 65 2e 67 00 30 0b 00 33 | was mad|e.g.0..3|
|00005b50| 07 0c 00 2a 07 00 00 00 | 20 0b 00 33 07 64 00 ff |...*....| ..3.d..|
|00005b60| ff 00 00 00 20 97 00 39 | 00 08 00 20 4e 6f 20 73 |.... ..9|... No s|
|00005b70| 77 69 74 63 68 65 73 20 | 61 74 20 6c 61 73 74 20 |witches |at last |
|00005b80| 6f 66 66 73 65 74 2e 20 | 54 72 79 20 61 6e 20 6f |offset. |Try an o|
|00005b90| 66 66 73 65 74 20 68 61 | 6c 66 20 61 73 20 62 69 |ffset ha|lf as bi|
|00005ba0| 67 2e 61 00 20 0b 00 20 | 07 64 09 60 01 0c 00 20 |g.a. .. |.d.`... |
|00005bb0| 07 00 10 62 00 ff ff 00 | 00 00 00 51 00 09 00 08 |...b....|...Q....|
|00005bc0| 00 ff ff 04 00 ff ff ff | ff 5e 00 00 00 ff ff 02 |........|.^......|
|00005bd0| 0c 00 0c 00 53 68 6f 77 | 56 69 65 77 48 65 6c 70 |....Show|ViewHelp|
|00005be0| 01 00 38 e4 01 00 00 1b | 00 ff ff c1 ff ff ff 00 |..8.....|........|
|00005bf0| 00 97 00 03 00 00 00 2a | 02 00 00 97 00 42 00 00 |.......*|.....B..|
|00005c00| 00 2a 20 53 68 6f 77 56 | 69 65 77 48 65 6c 70 20 |.* ShowV|iewHelp |
|00005c10| 2d 20 52 65 61 64 73 20 | 63 6f 6c 6f 72 73 20 61 |- Reads |colors a|
|00005c20| 6e 64 20 73 74 72 69 6e | 67 73 20 66 6f 72 20 76 |nd strin|gs for v|
|00005c30| 69 65 77 2d 6d 6f 64 65 | 20 68 65 6c 70 20 61 6e |iew-mode| help an|
|00005c40| 64 00 00 97 00 18 00 00 | 00 2a 20 70 75 74 73 20 |d.......|.* puts |
|00005c50| 74 68 65 6d 20 6f 6e 20 | 73 63 72 65 65 6e 2e 00 |them on |screen..|
|00005c60| 00 97 00 03 00 00 00 2a | 20 00 00 97 00 10 00 00 |.......*| .......|
|00005c70| 00 2a 20 50 61 72 61 6d | 73 3a 20 4e 6f 6e 65 00 |.* Param|s: None.|
|00005c80| 00 97 00 03 00 00 00 2a | 20 00 00 97 00 12 00 00 |.......*| .......|
|00005c90| 00 2a 20 4f 75 74 70 75 | 74 3a 20 53 63 72 65 65 |.* Outpu|t: Scree|
|00005ca0| 6e 00 00 97 00 03 00 00 | 00 2a 20 00 00 76 00 06 |n.......|.* ..v..|
|00005cb0| 00 a0 03 00 01 00 00 00 | 00 00 10 97 00 22 00 04 |........|....."..|
|00005cc0| 00 20 43 6c 65 61 72 20 | 6f 6c 64 20 68 65 6c 70 |. Clear |old help|
|00005cd0| 20 61 6e 64 20 64 69 73 | 70 6c 61 79 20 6e 65 77 | and dis|play new|
|00005ce0| 2e 00 10 38 00 00 00 3d | 03 00 10 6b 00 99 04 00 |...8...=|...k....|
|00005cf0| 10 0b 00 45 04 0b 00 8e | 01 0b 00 99 01 56 00 ff |...E....|.....V..|
|00005d00| ff ff ff 00 20 0b 00 19 | 07 e2 00 00 20 0b 00 19 |.... ...|.... ...|
|00005d10| 07 0b 00 78 01 03 01 61 | 00 00 00 00 30 73 01 0b |...x...a|....0s..|
|00005d20| 00 64 01 73 01 0b 00 56 | 01 a4 00 04 00 00 20 49 |.d.s...V|...... I|
|00005d30| 00 ff ff 00 30 73 01 0b | 00 6e 01 73 01 0b 00 56 |....0s..|.n.s...V|
|00005d40| 01 a4 00 04 00 00 20 50 | 00 00 20 73 01 0b 00 45 |...... P|.. s...E|
|00005d50| 04 73 01 0b 00 a4 01 c1 | 00 04 00 00 20 0b 14 d9 |.s......|.... ...|
|00005d60| 04 e2 00 00 20 0b 14 d9 | 04 95 00 93 00 00 10 65 |.... ...|.......e|
|00005d70| 00 ff ff ff ff 00 00 00 | 10 97 00 27 00 04 00 20 |........|...'... |
|00005d80| 52 65 73 74 6f 72 65 20 | 63 6f 6c 6f 72 20 61 6e |Restore |color an|
|00005d90| 64 20 73 68 6f 77 20 63 | 6f 6d 6d 61 6e 64 20 6c |d show c|ommand l|
|00005da0| 69 6e 65 2e 69 00 10 73 | 01 0b 00 64 01 73 01 0b |ine.i..s|...d.s..|
|00005db0| 00 56 01 a4 00 04 00 00 | 10 38 00 00 00 db 03 00 |.V......|.8......|
|00005dc0| 00 00 00 51 00 09 00 08 | 00 ff ff 04 00 ff ff ff |...Q....|........|
|00005dd0| ff 1f 00 00 00 ff ff 02 | 0c 00 0b 00 53 68 6f 77 |........|....Show|
|00005de0| 54 6f 70 43 61 72 64 01 | 00 38 04 04 00 00 1b 00 |TopCard.|.8......|
|00005df0| ff ff c1 ff ff ff 00 00 | 97 00 03 00 00 00 2a 01 |........|......*.|
|00005e00| 00 00 97 00 37 00 00 00 | 2a 20 53 68 6f 77 54 6f |....7...|* ShowTo|
|00005e10| 70 43 61 72 64 20 2d 20 | 53 68 6f 77 73 20 61 6c |pCard - |Shows al|
|00005e20| 6c 20 74 68 65 20 66 69 | 65 6c 64 73 20 6f 66 20 |l the fi|elds of |
|00005e30| 74 68 65 20 74 6f 70 20 | 63 61 72 64 2e 64 00 00 |the top |card.d..|
|00005e40| 97 00 03 00 00 00 2a 20 | 00 00 97 00 39 00 00 00 |......* |....9...|
|00005e50| 2a 20 50 61 72 61 6d 73 | 3a 20 57 6f 72 6b 43 61 |* Params|: WorkCa|
|00005e60| 72 64 20 2d 20 72 65 63 | 6f 72 64 20 74 6f 20 62 |rd - rec|ord to b|
|00005e70| 65 20 64 69 73 70 6c 61 | 79 65 64 20 61 73 20 74 |e displa|yed as t|
|00005e80| 6f 70 20 63 61 72 64 00 | 00 00 97 00 03 00 00 00 |op card.|........|
|00005e90| 2a 20 00 00 97 00 12 00 | 00 00 2a 20 4f 75 74 70 |* ......|..* Outp|
|00005ea0| 75 74 3a 20 53 63 72 65 | 65 6e 00 00 97 00 03 00 |ut: Scre|en......|
|00005eb0| 00 00 2a 20 00 00 76 00 | 0c 00 b0 03 00 01 01 00 |..* ..v.|........|
|00005ec0| bf 03 00 20 83 02 00 00 | 00 10 97 00 26 00 04 00 |... ....|....&...|
|00005ed0| 20 44 69 73 70 6c 61 79 | 20 65 61 63 68 20 66 69 | Display| each fi|
|00005ee0| 65 6c 64 20 6f 66 20 63 | 75 72 72 65 6e 74 20 63 |eld of c|urrent c|
|00005ef0| 61 72 64 2e 00 10 6b 00 | b1 04 00 10 0b 00 45 04 |ard...k.|......E.|
|00005f00| e2 00 0b 00 4c 04 e2 00 | 0b 00 11 04 e2 00 00 10 |....L...|........|
|00005f10| 73 01 0b 00 45 04 73 01 | 0b 00 4c 04 c1 00 04 00 |s...E.s.|..L.....|
|00005f20| 00 10 0b 00 11 04 4e 01 | 95 00 93 00 00 10 73 01 |......N.|......s.|
|00005f30| 0b 00 45 04 73 01 0b 00 | 4c 04 c1 00 04 00 00 10 |..E.s...|L.......|
|00005f40| 0b 00 bf 03 11 00 98 02 | 95 00 93 00 00 00 00 10 |........|........|
|00005f50| 0b 00 45 04 e2 00 0b 00 | 4c 04 e2 00 0b 00 11 04 |..E.....|L.......|
|00005f60| e2 00 00 10 73 01 0b 00 | 45 04 73 01 0b 00 4c 04 |....s...|E.s...L.|
|00005f70| c1 00 04 00 00 10 0b 00 | 11 04 4e 01 95 00 93 00 |........|..N.....|
|00005f80| 00 10 73 01 0b 00 45 04 | 73 01 0b 00 4c 04 c1 00 |..s...E.|s...L...|
|00005f90| 04 00 00 10 0b 00 bf 03 | 11 00 a1 02 95 00 93 00 |........|........|
|00005fa0| 00 00 00 10 0b 00 45 04 | e2 00 0b 00 4c 04 e2 00 |......E.|....L...|
|00005fb0| 0b 00 11 04 e2 00 00 10 | 73 01 0b 00 45 04 73 01 |........|s...E.s.|
|00005fc0| 0b 00 4c 04 c1 00 04 00 | 00 10 0b 00 11 04 4e 01 |..L.....|......N.|
|00005fd0| 95 00 93 00 00 10 73 01 | 0b 00 45 04 73 01 0b 00 |......s.|..E.s...|
|00005fe0| 4c 04 c1 00 04 00 00 10 | 6d 01 04 00 23 23 5f 2f |L.......|m...##_/|
|00005ff0| ff 00 0b 00 bf 03 11 00 | a9 02 95 00 0b 00 bf 03 |........|........|
|00006000| 11 00 b2 02 95 00 93 00 | 00 10 6d 01 02 00 23 23 |........|..m...##|
|00006010| ff 00 0b 00 bf 03 11 00 | b9 02 95 00 93 00 00 10 |........|........|
|00006020| 0b 00 45 04 e2 00 0b 00 | 4c 04 e2 00 0b 00 11 04 |..E.....|L.......|
|00006030| e2 00 0b 00 45 04 e2 00 | 0b 00 4c 04 e2 00 0b 00 |....E...|..L.....|
|00006040| 11 04 e2 00 00 00 00 10 | 0b 00 45 04 e2 00 0b 00 |........|..E.....|
|00006050| 4c 04 e2 00 0b 00 11 04 | e2 00 00 10 73 01 0b 00 |L.......|....s...|
|00006060| 45 04 73 01 0b 00 4c 04 | c1 00 04 00 00 10 0b 00 |E.s...L.|........|
|00006070| 11 04 4e 01 95 00 93 00 | 00 10 73 01 0b 00 45 04 |..N.....|..s...E.|
|00006080| 73 01 0b 00 4c 04 c1 00 | 04 00 00 10 0b 00 bf 03 |s...L...|........|
|00006090| 11 00 c1 02 95 00 93 00 | 00 00 00 10 0b 00 45 04 |........|......E.|
|000060a0| e2 00 0b 00 4c 04 e2 00 | 0b 00 11 04 e2 00 00 10 |....L...|........|
|000060b0| 73 01 0b 00 45 04 73 01 | 0b 00 4c 04 c1 00 04 00 |s...E.s.|..L.....|
|000060c0| 00 10 0b 00 11 04 4e 01 | 95 00 93 00 00 10 73 01 |......N.|......s.|
|000060d0| 0b 00 45 04 73 01 0b 00 | 4c 04 c1 00 04 00 00 10 |..E.s...|L.......|
|000060e0| 0b 00 bf 03 11 00 ca 02 | 95 00 93 00 00 00 00 10 |........|........|
|000060f0| 0b 00 45 04 e2 00 0b 00 | 4c 04 e2 00 0b 00 11 04 |..E.....|L.......|
|00006100| e2 00 00 10 73 01 0b 00 | 45 04 73 01 0b 00 4c 04 |....s...|E.s...L.|
|00006110| c1 00 04 00 00 10 0b 00 | 11 04 4e 01 95 00 93 00 |........|..N.....|
|00006120| 00 10 73 01 0b 00 45 04 | 73 01 0b 00 4c 04 c1 00 |..s...E.|s...L...|
|00006130| 04 00 00 10 0b 00 bf 03 | 11 00 d4 02 95 00 93 00 |........|........|
|00006140| 00 00 00 10 0b 00 45 04 | e2 00 0b 00 4c 04 e2 00 |......E.|....L...|
|00006150| 0b 00 11 04 e2 00 00 10 | 73 01 0b 00 45 04 73 01 |........|s...E.s.|
|00006160| 0b 00 4c 04 c1 00 04 00 | 00 10 0b 00 11 04 4e 01 |..L.....|......N.|
|00006170| 95 00 93 00 00 10 73 01 | 0b 00 45 04 73 01 0b 00 |......s.|..E.s...|
|00006180| 4c 04 c1 00 04 00 00 10 | 0b 00 bf 03 11 00 dc 02 |L.......|........|
|00006190| 95 00 93 00 00 00 00 10 | 0b 00 45 04 e2 00 0b 00 |........|..E.....|
|000061a0| 4c 04 e2 00 0b 00 11 04 | e2 00 00 10 73 01 0b 00 |L.......|....s...|
|000061b0| 45 04 73 01 0b 00 4c 04 | c1 00 04 00 00 10 0b 00 |E.s...L.|........|
|000061c0| 11 04 4e 01 96 00 00 10 | 73 01 0b 00 45 04 73 01 |..N.....|s...E.s.|
|000061d0| 0b 00 4c 04 c1 00 04 00 | 00 10 0b 00 bf 03 11 00 |..L.....|........|
|000061e0| e5 02 95 00 93 00 00 00 | 00 00 51 00 09 00 08 00 |........|..Q.....|
|000061f0| ff ff 04 00 ff ff ff ff | 3f 00 00 00 ff ff 02 0c |........|?.......|
|00006200| 00 0c 00 53 68 6f 77 45 | 64 69 74 48 65 6c 70 01 |...ShowE|ditHelp.|
|00006210| 00 38 cc 01 00 00 1b 00 | ff ff c1 ff ff ff 00 00 |.8......|........|
|00006220| 97 00 03 00 00 00 2a 01 | 00 00 97 00 42 00 00 00 |......*.|....B...|
|00006230| 2a 20 53 68 6f 77 45 64 | 69 74 48 65 6c 70 20 2d |* ShowEd|itHelp -|
|00006240| 20 52 65 61 64 73 20 63 | 6f 6c 6f 72 73 20 61 6e | Reads c|olors an|
|00006250| 64 20 73 74 72 69 6e 67 | 73 20 66 6f 72 20 65 64 |d string|s for ed|
|00006260| 69 74 2d 6d 6f 64 65 20 | 68 65 6c 70 20 61 6e 64 |it-mode |help and|
|00006270| 00 00 97 00 18 00 00 00 | 2a 20 70 75 74 73 20 74 |........|* puts t|
|00006280| 68 65 6d 20 6f 6e 20 73 | 63 72 65 65 6e 2e 00 00 |hem on s|creen...|
|00006290| 97 00 03 00 00 00 2a 20 | 00 00 97 00 10 00 00 00 |......* |........|
|000062a0| 2a 20 50 61 72 61 6d 73 | 3a 20 4e 6f 6e 65 00 00 |* Params|: None..|
|000062b0| 97 00 03 00 00 00 2a 20 | 00 00 97 00 12 00 00 00 |......* |........|
|000062c0| 2a 20 4f 75 74 70 75 74 | 3a 20 53 63 72 65 65 6e |* Output|: Screen|
|000062d0| 00 00 97 00 03 00 00 00 | 2a 20 00 00 76 00 06 00 |........|* ..v...|
|000062e0| cb 03 00 01 00 00 00 00 | 00 10 97 00 22 00 04 00 |........|...."...|
|000062f0| 20 43 6c 65 61 72 20 6f | 6c 64 20 68 65 6c 70 20 | Clear o|ld help |
|00006300| 61 6e 64 20 64 69 73 70 | 6c 61 79 20 6e 65 77 2e |and disp|lay new.|
|00006310| 00 10 38 00 00 00 3d 03 | 00 10 6b 00 a5 04 00 10 |..8...=.|..k.....|
|00006320| 0b 00 45 04 0b 00 8e 01 | 0b 00 99 01 56 00 ff ff |..E.....|....V...|
|00006330| ff ff 00 20 0b 00 19 07 | e2 00 00 20 0b 00 19 07 |... ....|... ....|
|00006340| 0b 00 78 01 03 01 61 00 | 00 00 00 30 73 01 0b 00 |..x...a.|...0s...|
|00006350| 64 01 73 01 0b 00 56 01 | a4 00 04 00 00 20 49 00 |d.s...V.|..... I.|
|00006360| ff ff 00 30 73 01 0b 00 | 6e 01 73 01 0b 00 56 01 |...0s...|n.s...V.|
|00006370| a4 00 04 00 00 20 50 00 | 00 20 73 01 0b 00 45 04 |..... P.|. s...E.|
|00006380| 73 01 0b 00 a4 01 c1 00 | 04 00 00 20 0b 14 d9 04 |s.......|... ....|
|00006390| e2 00 00 20 0b 14 d9 04 | 95 00 93 00 00 10 65 00 |... ....|......e.|
|000063a0| ff ff ff ff 00 00 00 10 | 97 00 18 00 04 00 20 52 |........|...... R|
|000063b0| 65 73 74 6f 72 65 20 6e | 6f 72 6d 61 6c 20 63 6f |estore n|ormal co|
|000063c0| 6c 6f 72 2e 00 10 73 01 | 0b 00 64 01 73 01 0b 00 |lor...s.|..d.s...|
|000063d0| 56 01 a4 00 04 00 00 00 | 00 00 51 00 09 00 08 00 |V.......|..Q.....|
|000063e0| ff ff 04 00 ff ff ff ff | 1e 00 00 00 ff ff 02 0c |........|........|
|000063f0| 00 0b 00 53 68 6f 77 43 | 6d 64 4c 69 6e 65 01 00 |...ShowC|mdLine..|
+--------+-------------------------+-------------------------+--------+--------+